scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-11-03 04:07:52 +00:00
Code Issues Packages Projects Releases Wiki Activity

turns off debug output, updates usage notes

Browse Source 
Signed-off-by: Jed Reynolds <jed@bitratchet.com>
This commit is contained in:
Jed Reynolds
2022-05-24 14:57:38 -07:00
committed by shivam
parent 290b83e592
commit 2260cf04c3
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
parse_loadmon.pl
View File

@@ -2,9 +2,19 @@
# Follow these message through journalctl using this technique: # Follow these message through journalctl using this technique:
# #
# Read from a pipe or a fifo:
# sudo ./loadmon | ./parse_loadmon.pl
#
# mkfifo /tmp/load.fifo
# ./parse_loadmon.pl < /tmp/load.fifo
# sudo ./loadmon > /tmp/load.fifo
#
# Loadmon output is now longer than journalctl line limits, so the
# below example will not work:
# sudo ./loadmon.pl | logger -t loadmon # sudo ./loadmon.pl | logger -t loadmon
# ...new terminal... # ...new terminal...
# watch -n15 'journalctl --since "20 sec ago" -t loadmon | ./parse_loadmon.pl' # watch -n15 'journalctl --since "20 sec ago" -t loadmon | ./parse_loadmon.pl'
# #
use strict; use strict;
@@ -26,7 +36,7 @@ sub mb {
while (my $line=<STDIN>) { while (my $line=<STDIN>) {
chomp $line; chomp $line;
print "line[$line]\n"; # print "line[$line]\n";
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);