December 31, 2005アーカイブ
皆さん、年末ジャンボの結果はいかがでしたか？
わたしは・・・・
300円です。
今回は、バラ10枚しか買わなかったのですが・・。
次回のグリーンジャンボは絶対当てるぞ！
いわきの大黒様の売り場まで買いに行こうかなぁ。
AWStatsはとても優秀なlog解析ツールですが、一部日本語化が不十分です。
下記の修正を加えると、より便利に使えます。
なお、対象はAWStats Ver 6.4とします。
----検索キーワード日本語化----
awstats.plの編集 Jcode使用の宣言を追加(use *****;とある最後に追加する)
use Jcode;
DecodeEncodedString関数の書き換え
オリジナルは次のようになっています。
sub DecodeEncodedString {
my $stringtodecode=shift;
$stringtodecode =‾ tr/¥+/ /s;
$stringtodecode =‾ s/%([A-F0-9][A-F0-9])/pack("C", hex($1))/ieg;
return $stringtodecode;
}
↓
sub DecodeEncodedString {
my $stringtodecode=shift;
$stringtodecode =‾ tr/¥+/ /s;
$stringtodecode =‾ s/%([A-F0-9][A-F0-9])/pack("C", hex($1))/ieg;
+ Jcode::convert(¥$stringtodecode, "utf8");
return $stringtodecode;
}
----日付表示の修正----
awstats.pl 8534行目を書き換える
print ($MonthRequired eq 'all'?"$Message[6] $YearRequired":"$Message[5] ".$MonthNumLib{$MonthRequired}." $YearRequired");
↓
print ($MonthRequired eq 'all'?"$YearRequired $Message[6]":"$YearRequired $Message[6]".$MonthNumLib{$MonthRequired}");
と書いても大変だと思うので、下記にリンクを張っておきます。
awstats6.4.txt
ダウンロードして、拡張子を.txt→.plへ変更してください。
