Timeout => 0,
              or die "Coudn't open socket port $port\n" unless $socket;