Help for this page

Select Code to Download


  1. or download this
    =69=     my $local_file = catfile($LOCAL, split "/", $path);
  2. or download this
    =105=    return unless -f and not $mirrored{$File::Find::name};
  3. or download this
          my ($v,$p,$n)=splitpath($File::Find::name);
      my $name=catfile($v,splitdir($p),$n);
      return unless -f and not $mirrored{$name};