my @result= do {
    my %temp;
    @temp{@employee}= ();
    grep ! exists $temp{$_}, keys %languages;
}