@list = grep { !exists $hash{$_} } @list;