[‰ß‹ŽÛ¸Þ] y‹¦—ÍŠèzBoo2008(‹ŒBoo80)‚Å‹ø‚ðH‚ׂ܂¹‚ñ‚©H@‚»‚Ì‚S (1001Ú½)
㉺‘OŽŸ1-V
’Šo‰ðœ •KŽ€Áª¯¶°(–{‰Æ) (‚×) Ú½žx ‚ ‚Ú[‚ñ
‚±‚̽گÄނ͉ߋŽÛ¸Þ‘qŒÉ‚ÉŠi”[‚³‚ê‚Ä‚¢‚Ü‚·¡
ŽŸ½ÚŒŸõ —ðí¨ŽŸ½Ú žxí¨ŽŸ½Ú ‰ß‹ŽÛ¸ÞÒÆ°
766: –¢³‘øL¦ ŸTWARamEjuA 2008/04/12(“y)09:54 ID:RXwERaHF0(1/3) AAS
# ‹N“®”§ŒÀ‘•’u
my $Process = scalar grep /$0/, qx|/bin/ps Uch2boo|;
my @LA5 = split /,/, (qx|/usr/bin/uptime| =~ /load averages: (.+)$/)[0];
Error('02',sprintf "Process = %d", $Process) if $Process > ((localtime)[2] == '0' ? 10 : 30);
Error('03',sprintf "load averages = %s, %s, %s", @LA5) if $LA5[0] > 5;
768: –¢³‘øL¦ ŸTWARamEjuA 2008/04/12(“y)10:05 ID:RXwERaHF0(2/3) AAS
Œ‹‰Ê‚ð”»‚è‚â‚·‚‚·‚é‚ƌڋq‚ª‘‚¦Žû“ü‚ª‚æ‚葽‚‚È‚é‚Ì‚©‚ÈH
769: –¢³‘øL¦ ŸTWARamEjuA 2008/04/12(“y)10:20 ID:RXwERaHF0(3/3) AAS
# ‹N“®”§ŒÀ‘•’u
my $Processes = scalar grep /$0/, qx|/bin/ps Uch2boo|;
my @LA5 = split /,/, (qx|/usr/bin/uptime| =~ /load averages: (.+)$/)[0];
if ($Processes > ((localtime)[2] > 16 ? 30 : 50)
or $LA5[0] > 5) {
Error('02',sprintf "Boo2008 running processes = %d : load averages = %s, %s, %s", $Processes, @LA5)
}
C³“_F
1. ƒGƒ‰[ƒƒbƒZ[ƒW‚ð1‚‚ɂµAboo2008‹N“®”‚ÆŽILA‚𓯎ž•\Ž¦‚·‚é‚悤‚É‚µ‚½B
@‚»‚ê‚É‚æ‚è"Good bye 1114", "‚ ‚Á‚Õ‚ ‚Á‚Õ‚µ‚Ä‚¢‚Ü‚·(L¥ƒÖ¥`) -> $err"‚ÍíœB
È4
㉺‘OŽŸ1-V‘ŠÖŽÊ”——õÝžx—ð
½Úî•ñ ÔÚ½’Šo ‰æ‘œÚ½’Šo —ð‚Ì–¢“Ç½Ú AA»ÑȲÙ
‚Ê‚±‚ÌŽè ‚Ê‚±TOP 0.033s