find2perl (was Re: help unblock me from *@perl.org so I can use perlbug)

x2p/find2perl.PL

@@ -42,26 +42,6 @@ use vars qw/$statdone/;
 use File::Spec::Functions 'curdir';
 my $startperl = "#! $perlpath -w";
 
-#
-# Modified September 26, 1993 to provide proper handling of years after 1999
-#   Tom Link <[email protected]>
-#   University of Pittsburgh
-#
-# Modified April 7, 1998 with nasty hacks to implement the troublesome -follow
-#  Billy Constantine <[email protected]> <[email protected]>
-#  University of Adelaide, Adelaide, South Australia
-#
-# Modified 1999-06-10, 1999-07-07 to migrate to cleaner perl5 usage
-#   Ken Pizzini <[email protected]>
-#
-# Modified 2000-01-28 to use the 'follow' option of File::Find
-#
-# Note currently
-# $ find2perl -name a|wc #produces a shorter program
-#     30      72     569
-# $ find2perl        |wc #than this:
-#     33      76     655
-
 sub tab ();
 sub n ($$);
 sub fileglob_to_re ($);