|
Hi,
I'm trying to use recursive with perl5.8.7 from activestate on a windowsXP system.
When i try the next command :
$numoffiles = File::Copy::Recursive->fcopy('/foo/nnn.doc','/foo2') or die $!;
This statement died.
Whithin your pm, i print de parameter in @_ and i see that
_[0] = File::Copy::Recursive
_[1] = /foo/nnn.doc
_[2] = /foo2
This is wrong for the rest of the subroutine, so i do a shift as a first statement in your
subroutines. Then it worked well.
Is this a bug ? or am i missing something ?
Secondly, when i use the following command (after i added a shift in de subroutine):
$numoffiles = File::Copy::Recursive->dircopy('/foo','/foo2') or die $!;
I get the following message :
Insecure dependency in mkdir while running with -T switch at E:/Perl5.8.7/site/lib/File/Copy/Recurs
+ive.pm line 153, <DATA> line 225.
What can i do, to resolve this ? (Is it normal that perl modules always run with taint-mode ON ?
Can anybody help me ?
Best regards,
Peter
|
