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__




_______________________________________________
Houston mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/houston
Website: http://houston.pm.org/

Reply via email to