Select Code to Download

139: socket($c,AF_INET,SOCK_STREAM,0)&&connect($c,sockaddr_in$ARGV[1],
+inet_aton$ARGV[0])||die$!;fcntl$_,F_SETFL,O_NONBLOCK|fcntl$_,F_GETFL,
+0 for

100: -MIO::Socket::INET $c=IO::Socket::INET->new(PeerHost=>"$ARGV[0]:$
+ARGV[1]")||die$!;$_->blocking(0)for

99:  -MIO::Socket::INET $c=IO::Socket::INET->new(PeerHost,"$ARGV[0]:$A
+RGV[1]")||die$!;$_->blocking(0)for
95:  -MIO::Socket::INET $c=new IO::Socket::INET PeerHost,"$ARGV[0]:$AR
+GV[1]"or die$!;blocking$_ 0for
85:  -MIO::Socket::INET $c=new IO::Socket::INET"$ARGV[0]:$ARGV[1]"or d
+ie$!;blocking$_ 0for