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