Help for this page

Select Code to Download

Select or download this

use File::Find::Rule;

...
    rename $oldname, "$newname.xml"
        or die "...";
}