Files
cacti/scripts/loadavg_multi.pl
T
Ian Berry 87de6aa496 making scripts compliment with 0.8 output structure
git-svn-id: svn+ssh://repo.cacti.net/var/data/svnroot/cacti/trunk/cacti@535 860744bd-22fc-0310-8c96-e9fe5004b5ca
2003-02-17 08:39:38 +00:00

11 lines
233 B
Perl

#!/usr/bin/perl
#get load avg for 1;5;10 min
$avg = `uptime`;
# 9:36pm up 15 days, 11:37, 2 users, load average: 0.14, 0.13, 0.10
$avg =~ s/^.*:\s(\d\.\d{2}),\s(\d\.\d{2}),\s(\d\.\d{2})$//;
print "1min:$1 5min:$2 10min:$3";