Select Code to Download

  system('/usr/bin/ssh', '-l', $owner, $host, $binct, @op, @lbtype);

  $< = $>;

#!/vobs/cello/cade_struct/bin/perl -w

...
}
$< = $>;
system('/usr/bin/ssh', '-l', $owner, $host, $binct, @op, @lbtype);