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 return997
, 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 alsoGetStatusCallback
.