Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^2: File::Find in a loop

by vagabonding electron (Chaplain)
on Apr 28, 2013 at 17:29 UTC ( #1031101=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    for my $source ( keys %dir )
    {
    ...
      $relativeName );
    (...compare and backup if new or newer ...)
    }
    
  2. or download this
    my $source = "N:/TEMP";
    my $destination = $dir{$source};
    ...
    
    my $source = "N:/TEMP_2";
    etc.
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1031101]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2017-04-29 11:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (531 votes). Check out past polls.