$Bill Luebkert wrote: > I would just create an array of unsigned bytes of max size > and use that. > > $devdata = pack 'U512', 0 x 512; # where 512 is arbitrary
Whoops - that unicode - should be: $devdata = pack 'C512', 0 x 512; -- ,-/- __ _ _ $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