Help for this page

Select Code to Download

Select or download this

my %hostdata;
{
...
for ( sort keys %hostdata ) {
   print join "\n", $_, @{$hostdata{$_}{dns}}, $hostdata{$_}{typ}, "\n
+";
}