Select Code to Download

my $rv = system('cp', '-cdpP', ...);
$rv == -1  and die("Can't execute cp: $!\n");
$rv & 0x7F and die("cp died from signal ", ($rv & 0x7F), "\n");
$rv >> 8   and die("Error ", ($rv >> 8), "from cp\n");