use File::Copy qw(copy move);
my $filename1 = "/tmp/blah blah blah.txt";
my $filename2 = "/tmp/TargetLocation/blah blah blah.txt";

copy( $filename1, $filename2);