URLのエンコード／デコード

Apacheのログ解析の際にURLエンコードされた文字列を、
Perl上でデコードする（例：%E3%83%9D%E3%83%A0→ポム）。

$hoge =~ tr/+/ /;
$hoge =~ s/%([a-f\d]{2})/pack 'H2',$1/egi;

ちなみに、エンコードは以下。

$hoge =~ s/([^\w ])/'%' . unpack('H2', $1)/eg;
$hoge =~ tr/ /+/;

参考
URL エンコード/デコードフォーム
Belution.com