Select Code to Download

$hashIPs{$ip} = {
                totalVulns => $ipTotalVulns,
                vulns => $vulns
};

region => $region

my $hashIPs{$ip} = {
...
for my $ip (keys %hashIPsNew){
print "$ip -- $hashIPsNew{$ip}{region} -- $hashIPsNew{$ip}{totalVulns}
+ -- $hashIPsNew{$ip}{vulns}\n";
}