Help for this page

Select Code to Download


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