or download this
# Run executable @system command, reporting name as $name If there
# is an upload limit, we run through trickle(1) to limit bandwidth.
sub _ext_cmd {
...
# system { $system[0] } @system[1..$#system]; # Obviously nope.
say "\$?=$?";
}