la connexion est toujours bloquante. Pour passer une socket en non bloquant il faut deja avoir ce socket, et donc avoir fait un new sur IO::Socket qui va etablir la connexion et bloquer comme un porc (meme au dela du time out sous Windows, meme avec des alarm ou quoi que ce soit d'autre). D'ailleurs le passage en non bloquant du socket ne marche pas sous windows, il faut le faire à la main avec un truc du genre ioctl( $sock, 0x80000000 | (4 << 16) | (ord('f') << 8) | 126, 1) || return 0;
La solution pour un connexion astnchrone serait peut etre d'utiliser le nouveau module Net-NBsocket et sa fonction $client = connect_NB($port_path,$netaddr);, mais la non plus je ne sais pas si ca marche sous windows...
De toute facon pourkoi vouloir faire un truc asynchrone alors qu'il veut justement un truc synchrone, et que c'est le comportement par defaut?