=69=     my $local_file = catfile($LOCAL, split "/", $path); 

##</code><code>##

=105=    return unless -f and not $mirrored{$File::Find::name};

##</code><code>##

      my ($v,$p,$n)=splitpath($File::Find::name);
      my $name=catfile($v,splitdir($p),$n);
      return unless -f and not $mirrored{$name};