my $telneg = ""; # Let's *try* to turn echo off on the remote side: $telneg .= chr(255).chr(254).chr(1); # IAC DONT ECHO $telneg .= chr(255).chr(251).chr(1); # IAC WILL ECHO # Also, we can't handle the GA signal: $telneg .= chr(255).chr(253).chr(3); # IAC DO SUPPRESS-GA $telneg .= chr(255).chr(251).chr(3); # IAC WILL SUPPRESS-GA # Try to turn off LINEMODE negotiation: $telneg .= chr(255).chr(254).chr(34); # IAC DONT LINEMODE $telneg .= chr(255).chr(252).chr(34); # IAC WONT LINEMODE # Ask for Negotiate About Window Size from the client: $telneg .= chr(255).chr(253).chr(31); # IAC DO NAWS