diff -Naur awstats.pl.old awstats.pl --- awstats.pl.old 2004-10-04 21:47:07.000000000 +0900 +++ awstats.pl 2004-10-04 23:05:48.535560464 +0900 @@ -15,6 +15,7 @@ use strict;no strict "refs"; use Time::Local; # use Time::Local 'timelocal_nocheck' is faster but not supported by all Time::Local modules use Socket; +use Jcode; #------------------------------------------------------------------------------ @@ -4173,10 +4174,18 @@ # Output: None # Return: decodedstring #------------------------------------------------------------------------------ +#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; }