use Quantum::Superpositions;
my $foobar = 'D';
my @array = 'A' .. 'D';
if ($foobar eq any( @array ) ) {
print "Yay!\n";
} else {
print "Boo\n";
}
In Perl6, the any and all functions will be keywords.
Being right, does not endow the right to be rude; politeness costs nothing.
Being unknowing, is not the same as being stupid.
Expressing a contrary opinion, whether to the individual or the group, is more often a sign of deeper thought than of cantankerous belligerence.
Do not mistake your goals as the only goals; your opinion as the only opinion; your confidence as correctness. Saying you know better is not the same as explaining you know better.