Hi,

Use File::Find::Rule::Procedural

Write something like

use File::Find::Rule 'find';
my @files = find( file => name => qr/\.($TYPES)$/i )->in( $DIR );
[download]