Help for this page
Using domain server: Name: 8.8.8.8 ... Aliases: google.com has address 74.125.113.147
if ($found_addr =~ m/^(\d+)\.(\d+)\.(\d+)\.(\d+)$/) { . . .
if ($found_addr =~ m/(\d.*)/) {