Sharad Gupta wrote:
>
> Hi All,
>
> I have a small script like this:
>
> -------------------------------------------------------------------
> use strict;
> use Net::Telnet;
>
> my $host = "Wilma";
> my $username = "Foo";
> my $pass = "Bar";
>
> my $s = Net::Telnet->new( Host=>$host,
> input_log => "input_log",
> dump_log => "dump_log",
> );
> $s->login($username,$pass);
> $s->print("ls");
> print $s->getlines();
> ----------------------------------------------------------------------
>
>
> I can run this from a nix machine without any problems. But when
> i try to run the same from a win2k machine it fails with "read timed-out"
> message. But the input_log file contains the correct output.
>
> Any ideas why getlines is timing out.
Maybe.
If you're Telnetting to a Windows machine then 'ls' isn't a valid command.
Otherwise you should check the differences between the Perl installations
on your Unix and Windows machine.
Oh, and upgrade to Windows XP, which is about the best-behaved system
that MS have come up with.
HTH,
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
