for my $system ($clearadm->FindSystem ($host)) {
($err, $msg) = $clearadm->TrimLoadavg ($$system{name});
for my $system ($clearadm->FindSystem ($host)) {
($err, $msg) = $clearadm->TrimLoadavg ($$system{name});
for my $filesystem ($clearadm->FindFilesystem ($$system{name}, $fs)) {
($err, $msg) = $clearadm->TrimFS ($$system{name}, $$filesystem{filesystem});
for my $filesystem ($clearadm->FindFilesystem ($$system{name}, $fs)) {
($err, $msg) = $clearadm->TrimFS ($$system{name}, $$filesystem{filesystem});
if ($msg eq 'Records deleted' or $msg eq '') {
verbose "Scrub filesystem $$system{name}:$$filesystem{filesystem}: $err $msg";
} else {
if ($msg eq 'Records deleted' or $msg eq '') {
verbose "Scrub filesystem $$system{name}:$$filesystem{filesystem}: $err $msg";
} else {
$clearadm->DeleteAlertlog ("timestamp<='$sixMonthsAgo'");
verbose "$runlog{task} alertlog: $runlog{status} $runlog{message}";
$clearadm->DeleteAlertlog ("timestamp<='$sixMonthsAgo'");
verbose "$runlog{task} alertlog: $runlog{status} $runlog{message}";