Help for this page
my $ses = new Net::Telnet(); $ses->open(Host => $hostname, Port => $port);
$logtxt = $ses->dump_log(); &logit;