Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"use List::MoreUtils qw(any);
...
'BAR' is in (foo BAR baz quux boff)
'bar' is NOT in (foo BAR baz quux boff)
'xyzzy' is NOT in (foo BAR baz quux boff)