Select Code to Download

resolve: Server 'clearprobe-ddns.winbeam.com'
;; query(clearprobe-ddns.winbeam.com)
;; setting up an AF_INET() family type UDP socket
...
;; send_udp(192.168.88.1:53)
;; send_udp(4.2.2.2:53)
resolve: res->errorstring: query timed out

root@cwb-2-11:~# echo “nameserver 192.168.88.1” > /etc/resolv.conf
root@cwb-2-11:~# nslookup clearprobe-ddns.winbeam.com
Server:    192.168.88.1
...

Name:      clearprobe-ddns.winbeam.com
Address 1: 64.13.48.40 64-13-48-40.war.clearwire-dns.net

root@cwb-2-11:~# netstat -una
Active Internet connections (servers and established)
Proto Recv-Q Send-Q Local Address           Foreign Address         St
+ate
...
Active Internet connections (servers and established)
Proto Recv-Q Send-Q Local Address           Foreign Address         St
+ate
udp     5256      0 0.0.0.0:52680           0.0.0.0:*

$sock = new IO::Socket::INET(
  PeerAddr => "$server",
  PeerPort => 37,
  Proto => 'tcp',
  Timeout => 5
);

$sock = new IO::Socket::INET(
  PeerAddr => "$server",
  PeerPort => 37,
  Proto => 'tcp'
);