Hey Mazhar,
I don't know much about perl, but in the $telnet->waitfor method, what does the
weird parameter mean ('/login: $/i')? I thought that $ means a scalar variable
in perl. What do the forward slashes do here? Some sort of regular expression??
Vishal
Quoting Mazhar <[EMAIL PROTECTED]>:
> Hi Folks,
> I have installed the module NET::TELNET from CPAN and when i try to
> execute the below simple pgm,
>
> --------------------****************************-----------------------
> use Net::Telnet;
> $telnet = new Net::Telnet ( Timeout=>100,Errmode=>'die');
> $telnet->open('202.177.129.37');
> $telnet->waitfor('/login: $/i');
> $telnet->print('root');
> $telnet->waitfor('/password: $/i');
> $telnet->print('[EMAIL PROTECTED]');
> print $telnet->cmd('who');
>
> ------------------------------------------------------------------------------
> The Output of the above program is
> pattern match read eof at prog.pl line 12
>
>
> Please help me out folks as where may be the problem
>
> Regards
> Mazhar
>
----------------------------------------
This mail sent through www.mywaterloo.ca
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
