Select Code to Download

sub xfer_ssh {
    my ($xferSessionInfo, @other_args) = (@_);
...
&xfer_ssh(\%xferSessionInfo, @other_args);

print $xferSessionInfo{foo};   # prints "bar"