Select Code to Download

sub pidqx { # returns pid + the usual backtick result
    my ( $cmd ) = @_;
...
    close $ph;
    return ( $pid, $backtick );
}