There certainly is. It's called grep. Sample code:

my $count = grep { $_ eq $e } @a;
[download]

Then $count will contain the number of occurrences of $e within @a.