This shows you the differences between two versions of the page.
| Next revision | Previous revision | ||
|
la_checker [2011/05/23 12:58] kyxap создано |
la_checker [2015/03/18 14:07] (current) kyxap [Скрипт проверки уровня LA] |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| - | ==== Скрипт проверки уровня LA ==== | + | {{tag>perl load_average watchdog}} |
| + | ====== Скрипт проверки уровня LA ====== | ||
| <code perl> | <code perl> | ||
| Line 6: | Line 7: | ||
| use strict; | use strict; | ||
| - | my $email = 'support@hqhost.net'; | + | my $email = 'support@pro-manage.net'; |
| open my $PROC, "/proc/loadavg" or die $!; | open my $PROC, "/proc/loadavg" or die $!; | ||
| Line 14: | Line 15: | ||
| my $la = $1; | my $la = $1; | ||
| if($la gt 10) { | if($la gt 10) { | ||
| - | system("top -b -n 2 | /usr/sbin/sendmail -svasechkin_LA $email"); | + | system("top -b -n 2 | /usr/sbin/sendmail -sVPS_LA $email"); |
| } | } | ||
| } | } | ||