http://qs321.pair.com?node_id=239997


in reply to Flag variables

How about: 
if (grep {$_ eq "foo"} @somearray) {
   someaction();
}

[download]
Or even: 
someaction() if grep {$_ eq "foo"} @somearray;

[download]

-Blake

In Section Seekers of Perl Wisdom