441:荒巻＠管理人 ★
2011/01/09(日) 10:27:22.62 ID:???
Sys::CpuLoad をごにょごにょしてLAに基づいたDB除外処理に取りかかってみる。
これで超重力発生時は検索DBが除外されてちょっとは快適になれるはず！
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）に合わせて
３．０以上の時は検索サーバーに接続しないようにしました。
ついでにエラーメッセージに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:???
ソース：
################################################################
#
854Res/198.54 KB
↑[8] 前[4] 次[6]
書[5]
板[3] 1-[1] l20
