in reply to ActivePERL is the devil?

This is a RTFM question but I'll bite anyways.

File::Copy was mentioned before.
use File::Copy; copy("oldfile", "newfile");
So then all you need is the "dir". I noticed you are using system calls, that is unnecesary for these type of commands.

try the following
my @files = <some\\path\\here\\*>; #the * means all files in that directory #just in case you were confused.
finally to delete a file use the following
unlink($filename);
If you want to set the context of your perl program to read from a particular directory without having to constantly put a $path + $filename then do the following
chdir($path) or die "foo error message\n"; #now do some foo with $filename in this directory
you just got served lol