Since $cool is a (disjunctive) superposition of three values, the expression $name eq $cool is true for three different values of $name: "Chuck", "Mick", and "Joe".use Quantum::Superpositions; my $cool = any("Chuck", "Mick", "Joe"); for my $name (qw(Schmoe Joe Chuck)) { if ($name eq $cool) { print "$name is cool\n"; } }
In reply to Re: Too much SQL not enough perl
by saintmike
in thread Too much SQL not enough perl
by jcpunk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |