http://www.perlmonks.org?node_id=681104


in reply to Net::Telnet timed out when logging in

Hi,

Normally, for the login process, you have to rewrite procedure. And for that you have to use the something like ..

$telnet->waitfor( -match => qr{ogin} ); $telnet->print($user); $telnet->waitfor( -match => qr{assword} ); $telnet->print($password);
and to test the solution, create log file of the telnet with
$telnet->input_log($log_file); $telnet->dump_log($dump_file);