Re: How to disable timeout in Net::Telnet

Try it without the single quotes; as in

$xTelnet = new Net::Telnet (Timeout => undef, Prompt =>'/\%\#\>\$ $/')
+;
[download]

Comment on Re: How to disable timeout in Net::Telnet Download Code

Replies are listed 'Best First'.
Re: Re: How to disable timeout in Net::Telnet by sksridevnair (Initiate) on Jun 17, 2002 at 18:42 UTC
Even without single quotes it is not working. My code is like this: `$xTelnet = new Net::Telnet (Timeout => undef, Errmode => sub {$sMsg = $xTelnet->errmsg(); $sLog = $xTelnet->dump_log(); $sLastMsg = $xTelnet->lastline(); print STDERR "\nERROR_MSG::$sMsg"; print STDERR "\nLOG_MSG::$sLog"; print STDERR "\nLAST_MSG::$sLastMsg"; return; }, Prompt =>'/[\%\#\>\$] $/',);` [download] edited: 17 Jun 2002 by jeffa - added code tags	[reply] [d/l]

Replies are listed 'Best First'.

Re: Re: How to disable timeout in Net::Telnet
by sksridevnair (Initiate) on Jun 17, 2002 at 18:42 UTC

$xTelnet = new Net::Telnet (Timeout => undef,
    Errmode => sub {$sMsg = $xTelnet->errmsg();
        $sLog = $xTelnet->dump_log();
        $sLastMsg = $xTelnet->lastline();

        print STDERR "\nERROR_MSG::$sMsg";
        print STDERR "\nLOG_MSG::$sLog";
        print  STDERR "\nLAST_MSG::$sLastMsg";
        return;
    },
    Prompt =>'/[\%\#\>\$] $/',);
[download]

edited: 17 Jun 2002 by jeffa - added code tags

[reply]
[d/l]