File::Find scans file systems. It won't help you.

I seem to remember JAR files being nothing but zip files, in which case you could use Archive::Zip. I don't know about EAR and WAR.