With Perl 5.10 and IO-Socket-SSL 1.13,

C:\Documents and Settings\Administrator>perl -MIO::Socket::SSL -e "pri
+nt $IO::Socket::SSL::VERSION"
1.13
C:\Documents and Settings\Administrator>perl -v

This is perl, v5.10.0 built for MSWin32-x86-multi-thread
[download]

I can use blocking(0) directly:

#ioctl($socket, 0x8004667e, pack("I", 1));
$socket->blocking(0);
[download]

but "print <$socket>" output garbled characters, and HTTPS server got no request.