- or download this
$ perl -de 42
Loading DB routines from perl5db.pl version 1.33
...
ack_nomem.pl
fringe.pl
khalou2.pl
- or download this
DB<6> print join "\n", grep { -M $_ < 50 } glob ("Old_PL_programs/*.
+*");
Old_PL_programs/ack_nomem.pl
Old_PL_programs/fringe.pl
Old_PL_programs/khalou2.pl
- or download this
DB<7> print join "\n", map {s/^.*\/(.+)/$1/r} grep -M $_<50, glob ("
+Old_PL_programs/*.*");
ack_nomem.pl
fringe.pl
khalou2.pl
- or download this
DB<7> print map {s/^.*\/(.+)/$1/; "$_\n"} grep -M $_<50, glob ("Old_PL_programs/*.*");