in reply to how to get rid of cut-and-paste sins?
In a similar vein to moritz' advice, you may wish to take a look at the links mentioned in Finding duplicated code in Perl.
Once (shame on you!)
Twice (shame on me!)
More often than I'd like to be
All the time
Just when answering stupid polls
Who you callin' a fool?
I refuse to vote in this ridiculous poll
Results (513 votes). Check out past polls.