telnet www.yahoo.com 80
Trying 64.58.76.229...
Connected to www.yahoo.akadns.net.
Escape character is '^]'.
##</code><code>##

use Net::Telnet;

$telnet = new Net::Telnet ( Timeout=>10,
                            Errmode=>'die',
                            Port => 80,
                            Prompt => '/\'.$/');

$telnet->open('www.whatever.com');
$output=$telnet->cmd('GET / ');
print $output;