use encoding "shift-jis";
@filenames = glob ("./あ*.*");
print "@filenames";

ファイル名が日本語のものを、globで拾いたいんですが、上のスクリプト
だと拾ってくれません（@filenamesが空になります）。
use encodingを削ると拾ってくれるんですが、use encodingは別の用で
いるもので。
お知恵をお貸し頂きたく。