ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/projects/cms/source/host/generic/statgrab.pl

Comparing projects/cms/source/host/generic/statgrab.pl (file contents):
Revision 1.28 by tdb, Mon Feb 5 17:43:45 2001 UTC vs.
Revision 1.29 by pjm2, Mon Feb 5 17:51:56 2001 UTC

#	Line 124 | Line 124 | sub include_top() {
124		my($top) = join(" ", @top);
125		$top =~ s/\n//g;
126
127	–	&print_pair(0, "packet.load.load1", $top =~ /load averages:\s*([^\s]+?),/);
128	–	&print_pair(0, "packet.load.load5", $top =~ /load averages:\s*.+?,\s*([^\s]+?),/);
129	–	&print_pair(0, "packet.load.load15", $top =~ /load averages:\s*.+?,\s*.+?,\s*([^\s]+?)\s/);
127		&print_pair(0, "packet.processes.total", $top =~ /([^\s]+?) processes:/);
128		&print_pair(0, "packet.processes.sleeping", $top =~ / ([^\s]+?) sleeping/);
129		&print_pair(0, "packet.processes.zombie", $top =~ / ([^\s]+?) zombie/);
#	Line 207 | Line 204 | sub include_uptime() {
204
205		# grab the uptime
206		my($uptime) = `$uptimebin`;
207	+
208	+	&print_pair(0, "packet.load.load1", $uptime =~ /load average.?:\s*([^\s]+?),/);
209	+	&print_pair(0, "packet.load.load5", $uptime =~ /load average.?:\s*.+?,\s*([^\s]+?),/);
210	+	&print_pair(0, "packet.load.load15", $uptime =~ /load average.?:\s*.+?,\s*.+?,\s*([^\s]+)/);
211
212		# work out the days, hours, and minutes
213

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines