Note as memory efficient as File::Copy, of course...use strict; use IO::All; use File::Spec; my $source_directory = 'foo'; my $target_directory = 'bar'; sub copyfile { for my $file (@_) { my $sourcename = File::Spec->catfile( $source_directory,$file); my $targetname = File::Spec->catfile( $target_directory,$file); io($targetname)->print(io($sourcename)->slurp); }; copyfile('README');
In reply to Re: Re: copy to different directory
by matija
in thread copy to different directory
by wolverina
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |