Help for this page
$secs = $telnet->timeout; $prev = $telnet->timeout($secs);
$ok = $obj->cmd( String => "xxx", Timeout => $secs, );