Help for this page

Select Code to Download


  1. or download this
            my $searchpath="/usr/storage";
            print "Here are the contents of the chosen search path\n"; sle
    +ep 2;
    ...
             foreach my $file (@files) {
               print $file . "\n";
             }
    
  2. or download this
     
    /usr/storage (top level directory)
    location1 (this is a directory)
    ...
    afile
    afile1
    afile2