Dig dns server with PERL


Warning: in_array() expects parameter 2 to be array, string given in /usr/local/4admin/apache/vhosts/tarlink.com/httpdocs/wp-content/plugins/facebook-button-plugin/facebook-button-plugin.php on line 244

Warning: in_array() expects parameter 2 to be array, string given in /usr/local/4admin/apache/vhosts/tarlink.com/httpdocs/wp-content/plugins/facebook-button-plugin/facebook-button-plugin.php on line 246

Today I created the PERL script to check if the DNS is resolve by other DNS servers To do that you will need create the <b>checkdns.pl</b> file #nano checkdns.pl And paste the below code: #!/usr/bin/perl $file=$ARGV[0]; chomp($file); @list = `cat…