>>892
解決法は >>894、もしくは use encoding を使わない。

理由は perldoc encoding の DO NOT MIX MULTIPLE ENCODINGS のあたりを参照。

use encoding "euc-jp";

my $str = '%C6%FC%CB%DC';

print "before: $str (" . length($str) . ")\n";

$str .= "\xFE";

print "after : $str (" . length($str) . ")\n";

use encoding については、作った本人が「使うな」と言ってる上に、
副作用が多すぎる。
新規で書くコードに関しては、Encode.pm で適宜変換するようにして、
文字リテラルには ascii しか書かないか、use utf8 をして utf-8 に
統一してしまうかの、どちらかを選択するべき。
古いコードで use encoding しているものは、no encoding で逃げるか、
駄目なら書き直すべし。

知ってる人間が use encoding 使ってたら、確実に殴る。