[pm-h] Recursive Directory Copy
Mike Flannigan
mikeflan at att.net
Sat Jun 7 19:20:57 PDT 2008
Do you guys know what is wrong here. I'm trying to
copy a directory recursively. I thought some combination
of these commands might work, but all give various errors
like "Invalid Argument".
This is on Win32.
use strict;
use warnings;
use File::NCopy qw(copy);
my $dir1 = "C:/Lame";
my $dir2 = "C:/Copy2";
copy \1,"$dir1","$dir2" or die "Copy failed: $!";
#copy "$dir1","$dir2" or die "Copy failed: $!";
#copy $dir1,$dir2 or die "Copy failed: $!";
#my $file = File::NCopy->new(recursive => 1);
#my $file = File::NCopy->new(u_chmod => \&my_chmod,f_check => \&my_fcheck);
#$file->copy "$dir1","$dir2" or die "Copy failed: $!";
__END__
More information about the Houston
mailing list