my $l = $_;
# dbg($l);
next unless $l =~ m{cluster\.pl$};
+ next if $l =~ m{bash\s+\-c};
my @f = split /\s+/, $l;
# dbg("$f[9]");
my ($m, $s) = split /:/, $f[9];
$f->close;
}
if ($secs) {
- $mc->cfgprint('proc', [qw(noi perminute)], 5*60,
+ $mc->cfgprint('proc', [qw(noo perminute)], 5*60,
"Processor Usage",
'Proc Secs / min', 'Proc Secs', 'Proc Secs') unless $want{dataonly};
$mc->data('proc', $secs, $secs, "Processor Usage") unless $want{cfgonly};