I posted here because the perlish way of using double negation logic in '!grep != ' or the trick to encode the variables to a string and check what it remains after removing a string. Sometimes this tricks would be useful (despite not pretty).
In response to draegtun comment:
Thanks for the Perl6::Junction hint. But probably I will go for List::MoreUtils