in reply to File::Copy but...
#!/usr/bin/perl -w use Shell; cp ("/path/file1","/path/file2"); [download]