Re^7: WIN32::API and void*

Select or download this

# Load the function.
my $LoadTableFromFile = new Win32::API("myDll.dll","myTableLoadFromFil
+e", 'PP', 'I', '_cdecl');

Select or download this

my $pathATable = 'C:/Temp/Requests/testTable.TBL';

Select or download this

my $pathATable = 'C:\Temp\Requests\testTable.TBL'; #no ""s

Select or download this

# pack the table.
my $packedaTable = pack('J',$aTable);
...
else
    {die "I dont know how to pack this table";}

Select or download this

# pack the table.
my $packedaTable = pack('J',$aTable);
...
else
    {die "I dont know how to pack this table";}
$packedaTable .= "\x00" x 100000000; #100MB allocation

Select Code to Download