Seems like a Data::Find module would be a nifty parallel to File::Find. But have you seen Data::Search? It looks like it might be able to do what you want.
Caution: Contents may have been coded under pressure.
Comment on Re: Recursively search nested hash/array structures