Extracting the title metatag from thousands of files

System

Hi,
I have been reading the threads regarding iwextattr clt to extract metadata from a file and someone posted a script that works recursively. However I am new to perl and am having a hard time. We work on TS 6.7.1/Unix platform. I am trying to extract the Title metatag from thousands of files. Is there a simple perl script that someone can help me with. Again, I know this question has been asked before, but I'm new to perl and I'm new to running iwperl commands.

Any help would be appreciated.

Thanks.

Claire