Help for this page

Select Code to Download


  1. or download this
    Can't cd to \\server\d$\dept\users\r_johnson/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM/STUFFCOM../../../../../../../../../../../../../../../../../../../../../.. at C:/Perl/lib/File/Find.pm line 535, <IN> line 1.
  2. or download this
    #!/usr/bin/perl

use File::Find;
...
  closedir(D);
  @dirs;
}