Help for this page

Select Code to Download

Select or download this

my %shortlist;
for my $key (keys $results->{ALLHOSTS}) {
...
            = $results->{ALLHOSTS}{$key}{ports}{tcp}{$key2}{state};
    }
}