use strict; use Net::Telnet; foreach(@hosts){ if (!fork()) { my $telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die'); $telnet->open($_); telnet->login('test', 'testuser'); my @arr = $telnet->cmd('ifconfig -a'); $telnet->close(); } }
In reply to Re: Net::Telnet
by gri6507
in thread Net::Telnet
by GS
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |