Hello,
Any one is using File::Remove, and on multi byte platform?
I'm using it on WindowsXP with Shift-JIS, a code for Japanese.
And I can't remove a directory named "Japan"(\x93\xfa, \x96\x7b).
Also it's return code is true.
I know "\x7b" means "{".
C:\>perl -MFile::Remove=remove -le "$File::Remove::debug++; print (remove
'@@%%')"
missing: @@__
@@__
This is a result treated by File::Glob::bsd_glob.
Some scripts not using wild card goes OK with BEGIN block:
BEGIN {
use File::Remove qw(remove);
no warnings 'redefine';
*File::Remove::expand = sub { @_ };
}
# Thanks for "Mastering Perl", Chapter 10.
I have not yet making scripts with Unicode.
Regards,
Japan As Forever!
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
