my %new_member; foreach (@newest_member) { $new_member{$_} = ''; } then for your loop (which as it looks now has the wrong outer loop going): foreach (values %whop) { if (exists( $new_member{$_} ) { print "$_* - "; } else { print "$_ - "; } }