I'd recommend checking out File::Find or File::Find::Rule to search for your XML files. Personally, I prefer File::Find::Rule. For what you're trying to do, the example code in the Synopsis of File::Find::Rule can be easily modified to look for *.xml instead of *.pm.