442:荒巻@管理人 ★
2011/01/09(日) 10:42:35.46 ID:???
とりあえずCPANからSys:CpuLoadをプラグ
Installing /usr/local/lib/perl5/site_perl/5.8.8/mach/auto/Sys/CpuLoad/CpuLoad.so
Installing /usr/local/lib/perl5/site_perl/5.8.8/mach/auto/Sys/CpuLoad/CpuLoad.bs
Installing /usr/local/lib/perl5/site_perl/5.8.8/mach/Sys/CpuLoad.pm
443:荒巻@管理人 ★
2011/01/09(日) 10:46:08.85 ID:???
Done。
Perlから
$LoadAverage = (Sys::CpuLoad::load());
でLA取得確認。
444:荒巻@管理人 ★
2011/01/09(日) 11:30:33.34 ID:???
とりあえずサーバの負担値(LA)に合わせて
3.0以上の時は検索サーバーに接続しないようにしました。
ついでにエラーメッセージにLAを載っけたのと、
!statusでサーバの状態が確認できるようにしてみました。
445:動けウゴウゴVIPサービス[sage]
2011/01/09(日) 11:34:24.77 ID:xvU1SZ.o
O2
446:荒巻@管理人 ★
2011/01/09(日) 15:58:24.08 ID:???
P2関係のシステムを改変中。
うお、2008年にP2さんから色々と権限もらってたのか、、
完全に忘れてた。。実装がかなり楽になりそうです。
www.logsoku.com
447:荒巻@管理人 ★
2011/01/09(日) 16:58:19.15 ID:???
IDの実装を書き直しました。
use Digest::MD5 ;
use Digest::MD5 qw(md5_hex);
448:動けウゴウゴVIPサービス[sage]
2011/01/09(日) 17:03:30.34 ID:GVborl2P
荒巻さんはp2の垢はあるんですか?
449:出来杉君 ◆B3hX8Wdksg[sage]
2011/01/09(日) 17:06:24.20 ID:HPfYBvI0
なおしたかもしれないけど、EZweb固有のコードもめちゃくちゃかぶりやすい仕様だった気がします
450:荒巻@管理人 ★
2011/01/09(日) 17:37:40.59 ID:???
ソース:
################################################################
#
451:荒巻@管理人 ★
2011/01/09(日) 17:38:08.10 ID:???
穴があったら指摘お願いしますー
とりあえず被り倒しは避けられたハズ。
854Res/198.54 KB
↑[8] 前[4] 次[6]
書[5]
板[3] 1-[1] l20