Select Code to Download

# Turns numerical return codes into text.  See perlvar.
sub get_system_error {
...
  local $! = $code;
  return "$!";
}

if (0 < $?) {
  my $sys_msg = get_system_error($?);
  die "'$cmd' failed. ret code $?.  (Guess: '$sys_msg'?)";
}