use Socket; for ( 0..100 ) { $domain = "i-am-a-domain-that-should-not-resolve-but-i-will-$_.com"; $ip = inet_ntoa(inet_aton($domain)); print "$domain\t$ip\n"; } __DATA__ i-am-a-domain-that-should-not-resolve-but-i-will-0.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-1.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-2.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-3.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-4.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-5.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-6.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-7.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-8.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-9.com 64.94.110.11 i-am-a-domain-that-should-not-resolve-but-i-will-10.com 64.94.110.11