Help for this page

Select Code to Download


  1. or download this
    my @subdirectories =
   grep { not /^\.\.?$/ }
   grep { -d }
   glob("*");
  2. or download this
    my @files =
   grep { -f }
   glob("*");