my $sock = IO::Socket::INET::->new( ... );