my @two_d = (
        [qw( foo bar baz)],
        [qw( bar baz quux)],
        [qw( baz quux foo)]
        );
my @rows = grep { grep {/foo/} @$_ } @two_d;
[download]

You get a 2-d array containing only the rows matching 'foo'.

After Compline,
Zaxo