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


in reply to Re^2: Net::Telnet blocks
in thread Net::Telnet blocks

tried $telnet->print and $telnet>waitfor rather that $telnet->login

same results: sucessful login but blocked for timeout seconds

while playing with pompts I got this message which never appeared before as I had always had the correct prompt

This indicates to me that the block until timeout has nothing to do with prompt matching:

error => telnet: 10.100.176.104 pattern match timed-out

Replies are listed 'Best First'.
Re^4: Net::Telnet blocks
by Corion (Patriarch) on Jul 19, 2010 at 16:00 UTC

    Well, this is exactly the error message you would get when Net::Telnet times out while waiting for a prompt:

    ## Check for failure. return $self->error("pattern match timed-out") if $s->{timedout};

    So, something changed with your remote end. You need to debug this, see the methods mentioned previously to you.