init III
This commit is contained in:
20
Perl reboot hp9304/reboot.pl
Normal file
20
Perl reboot hp9304/reboot.pl
Normal file
@@ -0,0 +1,20 @@
|
||||
#!/bin/perl
|
||||
|
||||
use Net::Telnet::Cisco;
|
||||
|
||||
|
||||
print "10.10.10.253 connect\n";
|
||||
|
||||
$session = Net::Telnet::Cisco->new(Host => "10.10.10.253", Errmode=>'return');
|
||||
|
||||
sleep(2);
|
||||
$session->cmd("enable");
|
||||
sleep(2);
|
||||
$session->cmd("batman");
|
||||
sleep(2);
|
||||
$session->cmd("LLDeB33");
|
||||
sleep(2);
|
||||
$session->cmd("reload");
|
||||
sleep(2);
|
||||
$session->cmd("y");
|
||||
sleep(2);
|
||||
Reference in New Issue
Block a user