Perl in a Nutshell

Perl in a NutshellSearch this book
Previous: Reference: SetOptionChapter 19
Win32 Modules and Extensions
Next: Reference: TimeConvert
 

SetStatusCallback

$inet->SetStatusCallback()

Initializes the callback routine that is used to return data about the progress of an asynchronous operation. This is one of the steps required to perform asynchronous operations; the complete procedure is:

# use the INTERNET_FLAG_ASYNC when initializing
$params{'flags'}=INTERNET_FLAG_ASYNC;
$inet = new Win32::Internet(params);

# initialize the callback routine
$inet->SetStatusCallback();

# specify the context parameter (the last 1 in this case)
$inet->HTTP($http, "www.yahoo.com", "anonymous", "dada\@divinf.it", 
            80, 0, 1);
At this point, control returns immediately to Perl and $inet->Error() will return 997, which means an asynchronous I/O operation is pending. Now, you can call:
$http->GetStatusCallback(1);
in a loop to verify what's happening; see also GetStatusCallback.


Previous: Reference: SetOptionPerl in a NutshellNext: Reference: TimeConvert
Reference: SetOptionBook IndexReference: TimeConvert