Help for this page

Select Code to Download

Select or download this

my $finder_type1 = File::Find::Rule->new()->name(qr/Type1_(.*?)\.xml$/
+i)->start(".");
while( my $file1 = $finder_type1->match()  ){
   $type1->addFile($file1);
...
}

etc...