AWStats 6.4 日本語化について

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へ変更してください。