Select Code to Download

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

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