I think the intention clearer if you use 'any' (from List::MoreUtils) rather than 'grep'. A secondary benefit is that it is probably slightly faster because it can quit as soon as it finds one match.

Update: Corrected typo and added link.