09/04/02 20:47:30
>>467 の
> if (-d encode('cp932',$file)) {print "$file is directory.\n"}
がおかしいんじゃないの？
エンコードするから、sjis の2バイト目の0x5Cが復活する。
if (-d $file) {print "$file is directory.\n"}
でうまくいくと思うが。
09/04/02 20:47:30
>>467 の
> if (-d encode('cp932',$file)) {print "$file is directory.\n"}
がおかしいんじゃないの？
エンコードするから、sjis の2バイト目の0x5Cが復活する。
if (-d $file) {print "$file is directory.\n"}
でうまくいくと思うが。