I've uploaded the modules Win32::Unicode::File and
Win32::Unicode::File::Ops, you can get a copy (zipped) right here:
http://siebe.bot2k3.net/perl/Win32.zip. The modules themselves are pretty
simple, but do the job I needed to do very well. The perlify() code is
largely (if not entirely) based on a solution given to me by Jan. There are
only a couple of slight adjustments because I already had a normal
CreateFile() handle open.

I'm still working on it (adding some more things like fstat()). If anyone
knows of functions in the Win32 API that I could extend it with, please be
my guest and tip me off. Other comments & improvements are welcome as well
:)

Siebe Tolsma
BOT2K3 Team [ http://bot2k3.net ]

----- Original Message ----- 
From: "$Bill Luebkert" <[EMAIL PROTECTED]>
To: "Siebe Tolsma" <[EMAIL PROTECTED]>
Sent: Saturday, June 18, 2005 4:50 PM
Subject: Re: Win32::API and Unicode filenames


> Siebe Tolsma wrote:
>
> > Thanks all for the feedback.
> >
> > I've fixed my implementation with a little bit of help with Jan Dubois
(he
> > indirectly tipped me off to use a null character at the end of the
string,
> > which worked). I've improved my module a bit with some things from Bill
> > Luebkert's implementation.
> >
> > Also, as Jan pointed out to me, it might be smart to have the module
also
> > work on Perl filehandle level. Therefor I've also added a perlify()
> > subroutine which seems to work.
>
> Give us alook at the 'perlify' code.
>
> -- 
>   ,-/-  __      _  _         $Bill Luebkert    Mailto:[EMAIL PROTECTED]
>  (_/   /  )    // //       DBE Collectibles    Mailto:[EMAIL PROTECTED]
>   / ) /--<  o // //      Castle of Medieval Myth & Magic
http://www.todbe.com/
> -/-' /___/_<_</_</_    http://dbecoll.tripod.com/ (My Perl/Lakers stuff)
>


_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to