C:\Documents and Settings\Owner\Desktop>perl w32inethttpsample.pl
Perl perl land thread id=27716
callback=0, constant=-1
PerlCallback: entering
PerlCallback: got context=1 mystatus=60
PerlCallback: myWin32InternetPerlInterpreterPtr=00233BFC
PerlCallback: ThreadId=27716
PerlCallback: GetLastError() =0
PerlCallback: GetLastError() =0
PerlCallback: pointer from Perl_get_context() =00233BFC
r=13369352
Connection num=0,text=The operation completed successfully.
callback INTERNET_STATUS_HANDLE_CREATED 13369352
PerlCallback: entering
PerlCallback: got context=2 mystatus=60
PerlCallback: myWin32InternetPerlInterpreterPtr=00233BFC
PerlCallback: ThreadId=27716
PerlCallback: GetLastError() =0
PerlCallback: GetLastError() =0
PerlCallback: pointer from Perl_get_context() =00233BFC
callback INTERNET_STATUS_HANDLE_CREATED 13369356
OpenRequest num=122,text=The data area passed to a system call is too small.
We are at last point before SendRequest(), which will trigger the crash
Press any key to continue . . .
SendRequest num=997,text=Overlapped I/O operation is in progress.
callback INTERNET_STATUS_HANDLE_CREATED 13369356
sleeping while downloading
PerlCallback: entering
PerlCallback: got context=2 mystatus=320
PerlCallback: myWin32InternetPerlInterpreterPtr=00233BFC
PerlCallback: ThreadId=6728
PerlCallback: GetLastError() =0
PerlCallback: GetLastError() =0
PerlCallback: pointer from Perl_get_context() =00000000
sleeping while downloading
sleeping while downloading
sleeping while downloading
sleeping while downloading

C:\Documents and Settings\Owner\Desktop>