Yet Another CPAN Grep

Dancer2-Plugin-Locale ( D/DM/DMUEY/Dancer2-Plugin-Locale-0.07.tar.gz, DMUEY, 2017; MetaCPAN )

Dancer2-Plugin-Locale/lib/Dancer2/Plugin/Locale.pm ( view source; MetaCPAN )

e = readdir($dh) ) {
                next if $file !~ m/\.json$/;
                next if $file eq 'en.json';
                $file =~ s/\.json//;
                if ( Locales::normalize_tag($file) ne

 $file ) {
                    warn "Skipping un-normalized locale named lexicon ($file.json) …\n";                                                                      # just no apparent need to co


                }

                if ( !-f "$locale_dir/$file.json" ) {
                    warn "Skipping non-file lexicon ($file.json) …\n";
                    next;
                }