jcreasey

#!/usr/bin/perl
use strict;
use warnings;
use POSIX ":sys_wait_h";

my $from = $ARGV[0];
my $to   = $ARGV[1];

print "Copying $from to $to\n";