my $search = "foo";
my @array = ("s1 bar", "s2 notfoo", "s3 foo")

##</code><code>##

grep {/$search$/} @array