The File::Copy copy function allows you to give the copy a new name. Just say
with some suitable definition of sub make_newname.my $newname = make_newname( $file); copy( "$dir\\$file", "C:\\testfiles\\$newname" ) or die "Failed to copy $file: $!\n";
The rename function is not difficult to use, either. Syntax is rename OLDNAME, NEWNAME.
After Compline,
Zaxo
In reply to Re: FindCopyRename File
by Zaxo
in thread FindCopyRename File
by Skyler99
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |