# No answer from zyxel
last;
}
- my $pid = fork();
- if ($pid == 0) {
- sleep 100;
- system("perl ./ciscong2.pl $switch");
- exit 0;
- }
+ print "Waiting for telnet to time out so we can do run ciscong.pl\n";
+ sleep 100;
+ system("perl ./ciscong2.pl $switch");
last;
}
last if $p->ping($ip);