pull database using replication

[angular-mojolicious.git] / scripts / snmp-printer.pl

diff --git a/scripts/snmp-printer.pl b/scripts/snmp-printer.pl
index 2f74a38..e9553c5 100755 (executable)
--- a/scripts/snmp-printer.pl
+++ b/scripts/snmp-printer.pl
@@ -23,6 +23,14 @@ sub save_json {
        warn "# $path ", -s $path, " bytes\n";
 }
 
+sub iso_datetime {
+       my ($ss,$mm,$hh,$d,$m,$y) = localtime(time);
+       return sprintf "%04d-%02d-%02dT%02d:%02d:%02d", $y+1900, $m, $d, $hh, $mm, $ss;
+}
+
+my $log_path = join('.', $dir, (split(/T/,iso_datetime,2))[0], 'json');
+open(my $log, '>>', $log_path) || die "$log_path: $!";
+
 my $debug = $ENV{DEBUG} || 0; 
 
 my $community = 'public';
@@ -140,8 +148,14 @@ foreach my $host ( $resp->hosts ) {
                delete $status->{$group};
        }
 
+       $status->{ip} = $host->hostname;
+       $status->{date} = iso_datetime;
        print "$host = ",dump($status);
        save_json $host => $status;
        $collected->{$host} = $status;
+
+       print $log encode_json($status),"\n";
 }
 
+close($log);
+warn "# log $log_path ", -s $log_path, " bytes\n";