projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix undef in route
[spider.git]
/
cmd
/
mrtg.pl
diff --git
a/cmd/mrtg.pl
b/cmd/mrtg.pl
index 6ee9d0b786dff32c596dc86e5a601bc899b86490..0cb0f501ed90b3bf8fbf3fd5ebb8ce180e53c863 100644
(file)
--- a/
cmd/mrtg.pl
+++ b/
cmd/mrtg.pl
@@
-70,7
+70,7
@@
if (!$main::is_win && ($want{proc} || $want{all})) {
chomp;
my $l = $_;
# dbg($l);
chomp;
my $l = $_;
# dbg($l);
- next unless $l =~ m{
/spider/perl/
cluster\.pl$};
+ next unless $l =~ m{cluster\.pl$};
my @f = split /\s+/, $l;
# dbg("$f[9]");
my ($m, $s) = split /:/, $f[9];
my @f = split /\s+/, $l;
# dbg("$f[9]");
my ($m, $s) = split /:/, $f[9];
@@
-80,9
+80,9
@@
if (!$main::is_win && ($want{proc} || $want{all})) {
$f->close;
}
if ($secs) {
$f->close;
}
if ($secs) {
- $mc->cfgprint('proc', [qw(no
i)], 6400
0,
+ $mc->cfgprint('proc', [qw(no
o perminute)], 5*6
0,
"Processor Usage",
"Processor Usage",
- '
Secs', 'Secs', '
Secs') unless $want{dataonly};
+ '
Proc Secs / min', 'Proc Secs', 'Proc
Secs') unless $want{dataonly};
$mc->data('proc', $secs, $secs, "Processor Usage") unless $want{cfgonly};
}
}
$mc->data('proc', $secs, $secs, "Processor Usage") unless $want{cfgonly};
}
}