Select Code to Download

else {
    $err = $merge ? '' : IO::Handle->new;
...
    die "Could not execute (@command): $@" if $@;
    $sel = $merge ? undef : IO::Select->new( $out, $err );
}