Select Code to Download

$ssh->system({stdin_data => $sas_string},
                  "cat >$rmt_dir/$rmt_file")
        or die "unable to write file: " . $ssh->error;