論文をやらなきゃいけないが，
関係ないことがすごく気になる．
Webalizerの検索語が文字化けしている．
いや．ここ最近の問題ではなく，導入した当初からだ．
めんどくさくて目を瞑っていたのに，忙しいときにやりたくなる．
そんなもんです．
基本ガイドラインは，こちらを参考にしましたよ．
### /usr/local/bin/decode.pl 700
#!/usr/bin/perl
use Jcode;
open (IN ,$ARGV[0]);
while (<IN>){
$_ =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
Jcode::convert(\$_,euc);
print $_;
}
close (IN);
exit;
### /usr/local/bin/webalizer.pl 700
#!/usr/local/bin/perl
$conf = '/etc/webalizer.conf';
$decode = '/usr/local/bin/decode.pl';
$outdir = '☆秘密☆';
`/usr/local/bin/webalizer -c $conf`;
@htmls = <$outdir/*.html>;
foreach (@htmls) {
$filename=$_;
`$decode $filename > $filename.euc`;
`mv $filename.euc $filename`;
}
exit;
文字化けは解消されました．
ふぅ．論文やろうかなっと．