Help for this page

Select Code to Download

Select or download this

for my $name (@unlike) {
    my @hosts = map {$entries{$name}{$_}{host}} keys %{$entries{$name}
+};
    print "$name found on \n\t", join ("\n\t", @hosts), "\n\n";
}

Select or download this

bjose found on 
    /var/tmp/passwd.hostname2.platform
    /var/tmp/passwd.hostname1.platform