my($ok) = grep {/Some String/} @anArray;

##</code><code>##

my $ok = grep {/Some String/} @anArray;