in reply to Re: OR operator (hash)
in thread OR operator

BEGIN { @primary{qw( red blue green )} = (); }

if(exists $primary{$color})

[download]
:P

Makeshifts last the longest.

In Section Seekers of Perl Wisdom