[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