$_ =~ s/\$CRIT{(\w+)}/$warn{$user}{$1} ? " (APPROACHING QUOTA)" : ""/mge;
}
#print join('', @msg);
- open(MAIL, "| mail -s 'Approaching quota limit at HCoop' -a 'From: admins\@hcoop.net' -b 'docelic' '$user\@hcoop.net'");
+ open(MAIL, "| mail -s 'Approaching quota limit at HCoop' -a 'From: admins\@hcoop.net' -b 'admins@hcoop.net' '$user\@hcoop.net'");
{ no warnings; print main::MAIL join('', @msg); }
close MAIL;
}
threshold=$threshold{mail}
use=$warn{mail} $CRIT{mail}
-Databases:
- size=$vol{db}{diskused} KB
- quota=$vol{db}{maxquota} KB
- threshold=$threshold{db}
- use=$warn{db} $CRIT{db}
-
Please submit your disk quota increase request in a timely
manner at: