in reply to Issue with Net::telnet

Is that a lack of a CRLF at the end of the prompt?

This smells a bit like you are suffering from buffering.

Net::Telnet-WTKBU

Perhaps try setting your record separator to nothing?

Replies are listed 'Best First'.
Re^2: Issue with Net::telnet
by yarex (Initiate) on Feb 11, 2015 at 16:54 UTC
    Tried following: $conn->waitfor(Match=>'/...>/',Timeout=>100); or $conn->waitfor(Match=>'/...>\r/',Timeout=>100); or $conn->waitfor(Match=>'/...>\r\n/',Timeout=>100); or $conn->waitfor(Match=>'/...>\n/',Timeout=>100); (or setting prompt) but am getting: pattern match read eof at /usr/lib/perl5/site_perl/5.10.0/TeamFuel/tan +kpoll.pl line 211 $conn->input_record_separator; did not help :-(
      My problem is solved. I used Expect module to do the job and that worked flawlessly.