mirror of
https://github.com/Telecominfraproject/wlan-lanforge-scripts.git
synced 2025-11-01 03:07:56 +00:00
parse_loadmon: outputs date
Signed-off-by: Jed Reynolds <jed@bitratchet.com>
This commit is contained in:
@@ -40,6 +40,7 @@ while (my $line=<STDIN>) {
|
|||||||
my $lc_pos = index($line, '[{');
|
my $lc_pos = index($line, '[{');
|
||||||
# print "lc at $lc_pos\n";
|
# print "lc at $lc_pos\n";
|
||||||
next if ($lc_pos < 0);
|
next if ($lc_pos < 0);
|
||||||
|
print `date`;
|
||||||
my $loadmon_line = substr($line, $lc_pos);
|
my $loadmon_line = substr($line, $lc_pos);
|
||||||
my $ra_loadmon = parse_json($loadmon_line);
|
my $ra_loadmon = parse_json($loadmon_line);
|
||||||
#print Dumper($ra_loadmon);
|
#print Dumper($ra_loadmon);
|
||||||
|
|||||||
Reference in New Issue
Block a user