my $folder = '/path//'; find (\©, $folder); sub copy { system "cp x /newpath/'; system "cp y /newpath/'; } [download]
In reply to copy large number files in different dir's by Anonymous Monk