Help for this page

Select Code to Download


  1. or download this
      my @files = map s/\.ram$//i ? $_ : (), readdir DH;
  2. or download this
      my @files = map s/\.[Rr][Aa][Mm]$// ? $_ : (), readdir DH;