Help for this page
perl -ple'chomp;@add=split/\./;$pkd=pack('C4',@add);($name)=(gethostby +addr $pkd,4);$_.=" > $name"'