diff options
| author | Michael G Schwern <schwern@pobox.com> | 2009-03-25 08:59:11 -0500 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2009-03-25 08:59:11 -0500 |
| commit | 06b04381422967d8e9b6486b0263b0856a171d65 (patch) | |
| tree | 73a0fb853b624c1d87641a1840747177ce803c62 /x2p | |
| parent | 036055ae9ae83cd5b00514419663540cb13fc21a (diff) | |
| download | perl-06b04381422967d8e9b6486b0263b0856a171d65.tar.gz | |
find2perl (was Re: help unblock me from *@perl.org so I can use perlbug)
Diffstat (limited to 'x2p')
| -rw-r--r-- | x2p/find2perl.PL | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/x2p/find2perl.PL b/x2p/find2perl.PL index 982ed2632c..e9275d0c5c 100644 --- a/x2p/find2perl.PL +++ b/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 <tml+@pitt.edu> -# University of Pittsburgh -# -# Modified April 7, 1998 with nasty hacks to implement the troublesome -follow -# Billy Constantine <wdconsta@cs.adelaide.edu.au> <billy@smug.adelaide.edu.au> -# University of Adelaide, Adelaide, South Australia -# -# Modified 1999-06-10, 1999-07-07 to migrate to cleaner perl5 usage -# Ken Pizzini <ken@halcyon.com> -# -# 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 ($); |