aboutsummaryrefslogtreecommitdiffstats
path: root/clients/ping.pl
diff options
context:
space:
mode:
authorJoachim Tingvold <joachim@tingvold.com>2015-03-31 05:09:33 +0200
committerJoachim Tingvold <joachim@tingvold.com>2015-03-31 05:09:33 +0200
commit381e194162092e6ca6d1da2248a41af8b4f7208d (patch)
tree224c1f7003a1ff3f9a5f4d844c1bea3c86f88958 /clients/ping.pl
parent191df1949e2e05eb20b49d5cb31afc7a1f70da91 (diff)
parente3d7c5cc86fedb458d9b091ca12245c01e7f285d (diff)
Merge branch 'master' of github.com:tech-server/tgmanage
Diffstat (limited to 'clients/ping.pl')
-rwxr-xr-xclients/ping.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/clients/ping.pl b/clients/ping.pl
index b41febd..3bbdd8a 100755
--- a/clients/ping.pl
+++ b/clients/ping.pl
@@ -36,6 +36,7 @@ while (1) {
$ping->host_add($secondary_ip);
$secondary_ip_to_switch{$secondary_ip} = $switch;
}
+ print "ip: $ip\n";
}
my $result = $ping->ping();
die $ping->get_error if (!defined($result));
@@ -61,7 +62,7 @@ while (1) {
$dbh->pg_putcopyend();
$dbh->commit;
-
+ if (0) {
# ping linknets
$ping = Net::Oping->new;
$ping->timeout(0.2);
@@ -86,6 +87,7 @@ while (1) {
$dbh->pg_putcopyend();
$dbh->commit;
+ }
sleep 1;
}