- or download this
use File::Copy;
...
$old = "$dir$file
$new = "$moveloc";
copy($old, $new) or die "Copy Faild: $!";
- or download this
./testrenp11122010b
./testrenp11122010b: use: not found.
./testrenp11122010b[3]: =/tmp/test2/magic/: not found.
./testrenp11122010b[4]: 0403-057 Syntax error at line 4 : `(' is not e
+xpected.