my $count_foo = grep { $_ eq 'foo' } @array;