Select Code to Download

my %con_opts;
$con_opts{host} = $host;
...
($ssh{'STDIN'}, $ssh{'STDOUT'}, undef, $ssh{'PID'}) =
        $ssh{'SSH'}->open_ex(\%opts, $script)
            or die "Error ".$ssh{$host}->error;

my $Q = new Thread::Queue;
# Kick this off asynchronously to put things into the
...
    $Q->enqueue( undef );
}->detach;
return $Q;