- 517 名前：511 mailto:sage [2006/07/23(日) 16:22:12 ID:???]
- >512-513
テスト中の出来事なので1時間以内にキャッシュにアクセスしています。
wgetをcron経由の技は違うシーンでパクらせて頂きます。
>514
use CGI::SpeedyCGI;
my $sp = CGI::SpeedyCGI->new;
print "Running under speedy=", $sp->i_am_speedy ? 'yes' : 'no', "\n";
↑はチェック済みでyesが出ました。↓はこの後に試してみます。
if (eval {require CGI::SpeedyCGI} && CGI::SpeedyCGI->i_am_speedy) {
>515
use vars qw($dbh);
unless (defined($dbh)) {
$dbh = DBI->connect(***, ****);
}
ちなみに↓も試しました。
$dbh = DBI->connect_cached(***, ****);
use varsでもmy $dbhでも同じ状況です。
更新後に成功して2回目でDBIがコケる事がよくあります。
キャッシュがカギか！と思わせてたまに、2回目も問題なくクリアしたりとさっぱり原因がわかりません。
|
 |
