print grep { $host_ip{$_} eq "1.1.1.1"} keys %host_ip;
where:
%host_ip = (
"First" => "1.1.1.1",
"Second" => "2.2.2.2"
);
print grep { $host_ip{$_} eq "1.1.1.1"} keys %host_ip;
where:
%host_ip = (
"First" => "1.1.1.1",
"Second" => "2.2.2.2"
);
Get updates delivered right to your inbox!