BEGIN { @primary{qw( red blue green )} = (); } if(exists $primary{$color}) [download]
Makeshifts last the longest.
In reply to Re^2: OR operator (hash) by Aristotle in thread OR operator by Anonymous Monk