Help for this page

Select Code to Download


  1. or download this
     

find(\&all, @allpaths);
...
            s/gpfs_data/nas\/rdds/;
        }
}
  2. or download this
    
foreach (@allpathlisting) 
...
            s/gpfs_data/nas\/rdds/;
        }
  3. or download this
    (my $fn = $File::Find::name) =~ tr#/#\\#;