avatar
f*y
1
有谁解释一下:
use Net::Telnet::Cisco;
my $session1 = Net::Telnet::Cisco->new(Host => '111.157.143.5');
$session1->login('', 'ciscophee');
@shver1 = $session1->enable('pheecisco');
@shver1 = $session1->cmd('clear crypto isakmp');
@shver1 = $session1->cmd('clear crypto sa');
$session1->close;
foreach $line (@shver1){
print "$line";
}
是重起cisco router?
除了perl,还有其他方法可以实现吗?(远程操作cisco router)
相关阅读
logo
联系我们隐私协议©2024 redian.news
Redian新闻
Redian.news刊载任何文章,不代表同意其说法或描述,仅为提供更多信息,也不构成任何建议。文章信息的合法性及真实性由其作者负责,与Redian.news及其运营公司无关。欢迎投稿,如发现稿件侵权,或作者不愿在本网发表文章,请版权拥有者通知本网处理。