Kanesher is right on, as far as I am concerned.
A frum yid, a lamdan, starts doing something that is really, really stupid. He does it once. He does it again. He regrets it each time and feels terrible about it. Slowly he makes this stupid mistake fifty times and it starts to get expanded into something even more stupid. When he thinks it over her realizes he is, in fact, acting like a total idiot. He therefore hides his behavior and only does it in the utmost secrecy and privacy. He continues acting like a jackass for ten years and finds out that he better not let his wife get wind of it, for it'd mess their marriage up a great deal. He is violating trust and undermining his own self respect by acting this immature and idiotic way, but finds he tries but cannot succeed at stopping. He figures he is just a moron. After all, he is doing the same really dumb stuff habitually. Think up something dumb. Anything. And he can't stop!
You'd agree that he's got some kind of serious mental problem, seriously, no?
Would you say this fellow has a problem dealt with in s'forim? Mishlei spends a lot of time telling us not to be jerks. Have you checked it out? It also talks a lot about alcoholism, womanizing, gambling, raging, and lusting. It doesn't matter if it's in a sefer. It can stay in the sefer and do no good at all. To me, the more relevant question may be why there is no group movement of people in Yiddishkeit to deal with these issues, not "is there a sefer that outlines something like a program" or not. (And BTW, there are plenty that outline a program like this one.)
Consider reading the silly story above again, but substitute the "stupid behavior" he was doing with compulsive porn surfing, masturbation, phone calls, or any other form of lust acting out behavior. After all, don't you agree that doing all or any of these things is, in fact, just plain stupid?
Yet we do them, anyway, don't we? Even though they are stupid and we are smart.
Or are we?
If you find you keep doing this stuff even though it's stupid, then what does being a nut have to do with yiddishkeit at all?
That is what I'd like to know.