while (<$FILE1>) {
    foreach my $value (keys %lookup) {
        if ($hris [1] eq $lookup{$value}) {
            &print_entry($dn, $uid, $div, $loc);
        }	
    }
}