#!/usr/bin/perl
use strict;
use warnings;
use File::Copy;

my $source = $ARGV[0];
my $target = $ARGV[1];
copy($source, $target) or die "Can't copy files ($!) ($?)\n"; 

##</code><code>##

./copy.pl "testing spaces.txt" output.txt