I prefer writing something like:

unless(grep{ $_ eq $word } @wordlist ) {
       ....
}
[download]

I think it is more readable than a short !...

Best regards,
perl -e "print a|r,p|d=>b|p=>chr 3**2 .7=>t and t"