Help for this page
$telnet->waitfor('/ Continue $/i') or die "Can't find enter to continu +e", $telnet->lastline;
$telnet->timeout(30); # for a 30 second timeout $telnet->waitfor('/ Continue $/i'); $telnet->timeout(10); # reset timeout to 10 second