use IPC::System::Simple qw(system);

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

##</code><code>##

{
    use autodie qw(system);
    system('/usr/bin/ssh', '-l', $owner, $host, $binct, @op, @lbtype);
}