in reply to Finding duplicated code in Perl
Have you looked at the original language -> Perl conversion to see if you can trap the duplication there?