> I need to collect some information from a Cisco switch and am using the
> following:
> use Net::Telnet::Cisco;
> my $cs = Net::Telnet::Cisco->new( Host => 'cisco6506', Timeout =>
> '35');
> $cs->login( 'user', 'password') or die "Can't login";
> # Enter enable mode
> $cs->enable("en-password") or die "Can't enable: ";
> # Turn off paging
> my @cmd_output = $cs->cmd( 'terminal length 0' );
> # Execute a command
> @cmd_output = $cs->cmd( 'show top' );
> print @cmd_output;
> $cs->close;
> The command "show top" collects information for 30 seconds and then
> produces output, but the script times out before the command comes back.
> The timeout value on the second line seems to force a 35 second delay
> before processing the next line, which does not help. I've tried the
> timeout value on the CMD line but I get a syntax error. Any ideas?
>
> Ray Nichols
> ZC Sterling Insurance Agency, inc.
> (949) 206-6447
> [EMAIL PROTECTED]
>
