perl dns record check
脚本输出结果：
root@ubuntu:~/script# perl dns_check_google.pl
--------------------- List A_Record ----------------------------
www.google.com: 74.125.128.99
www.google.com: 74.125.128.103
www.google.com: 74.125.128.104
www.google.com: 74.125.128.105
www.google.com: 74.125.128.106
www.google.com: 74.125.128.147
Unable to obtain A record : NXDOMAIN
mail.google.com: 74.125.128.17
mail.google.com: 74.125.128.18
mail.google.com: 74.125.128.19
mail.google.com: 74.125.128.83
Unable to obtain A record : NXDOMAIN
***.google.com: 64.9.224.68
***.google.com: 64.9.224.69
***.google.com: 64.9.224.70
Unable to obtain A record : NXDOMAIN
--------------------- List SOA_Record ----------------------------
SOA record:
google.com. 86050 IN SOA ns1.google.com. dns-admin.google.com. (
2013015000 ; Serial
7200 ; Refresh
1800 ; Retry
1209600 ; Expire
300 ) ; Minimum TTL
--------------------- List MX_Record ----------------------------
MX Records is :
10 aspmx.l.google.com
20>
30>
40>
50>
--------------------- List NS_Record ----------------------------
NS Records :
ns4.google.com
ns1.google.com
ns2.google.com
ns3.google.com
--------------------- List SPF_Record ----------------------------
SPF Records is :
SPF record ok: v=spf1 include:_netblocks.google.com include:_netblocks6.google.com ip4:216.73.93.70/31 ip4:216.73.93.72/31 ~all
--------------------- List AXFR_Record ----------------------------
页:
[1]