encodingの使い方がよく分かりません。
use encoding "shiftjis" ってやると、shiftjisでコーディングできるようになったとこまではよかったんですが、

opendir ( DIR, $dir );
my @files = readdir( DIR );
@target = grep {/漢字ファイル名/} @files;

ってやっても、望んだファイルが引っかかってくれません。

use open IO => ":encoding(utf8)";
use open ":std";
って入れても一緒でした。
use open IO => ":encoding(shiftjis)";
とすると
"\x{0088}" does not map to shiftjis at ...
みたいなエラーが山ほど出てきて駄目でした。
ちゃんとUNICODEで入ってきてるっぽいです…

やっぱり読み込むたびに手動でUNICODEに変換しなきゃ駄目なんでしょうか？