use File::Copy;

copy("oldfile", "newfile"); 

##</code><code>##

my @files = <some\\path\\here\\*>; 
#the * means all files in that directory
#just in case you were confused.

##</code><code>##

unlink($filename);

##</code><code>##

chdir($path) or die "foo error message\n";
#now do some foo with $filename in this directory