File::Find is a really handy way to recurse directory structures and 'do stuff' to the files you find.

BTW, I expect you'll have better results if you post an attempt at writing some code.

TGI says moo