Files
cacti/scripts/loadavg_multi.pl
T
Ian Berry eb59dd520f Initial revision
git-svn-id: svn+ssh://repo.cacti.net/var/data/svnroot/cacti/trunk/cacti@2 860744bd-22fc-0310-8c96-e9fe5004b5ca
2002-05-18 20:29:57 +00:00

11 lines
157 B
Perl

#!/usr/bin/perl
# get load avg for 1;5;10 min
$uptime = `uptime`;
$uptime =~ s/.*://;
$uptime =~ s/,//gi;
$uptime =~ s/^ //;
chomp $uptime;
print $uptime;