If you want to write portable Perl, then you should use the File::Copy module to do the job.

use File::Copy;
copy('blabla.jpg', 'c:\games');
[download]