my %ns_records = map {
    $ns_list[$_] => [
        $addr_list[$_],
        $ptr_list[$_],
        $uptime_list[$_]
    ]
} 0 .. $#ns_list;