$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 LuebkertMailto:[E
cafs wrote:
> hello I am starting to learn how to import functions using
> Win32::API
>
> the following function outputs a pointer to a structure
> and I understand how to use perls pack to "build" the required
> structure.
>
> WINSETUPAPI BOOL WINAPI
> SetupDiEnumDeviceInfo(
> IN HDEVINFO
hello I am starting to learn how to import functions using
Win32::API
the following function outputs a pointer to a structure
and I understand how to use perls pack to "build" the required
structure.
WINSETUPAPI BOOL WINAPI
SetupDiEnumDeviceInfo(
IN HDEVINFO DeviceInfoSet,
IN DWORD Me