in reply to Perl as grep

The solution is on your friendly local CPAN mirror: here

In Section Seekers of Perl Wisdom