Commit upstream/0.21 - liblocales-perl

+3

-0

Changes less more

	0	0.21 Tue Nov 29 09:34:07 2011
	1	- rt 72788: fix tests that fail when nvsize > 8, no code changes except version bump
	2
0	3	0.20 Mon Sep 26 09:30:32 2011
1	4	- improve plural form fallback during CLDR build
2	5	- rt 70503 - fix NAME section in generated plural form POD

+1

-1

META.yml less more

0	0	--- #YAML:1.0
1	1	name: Locales
2		version: 0.20
	2	version: 0.21
3	3	abstract: Methods for getting localized CLDR language/territory names (and a subset of other data)
4	4	author:
5	5	- Daniel Muey <http://drmuey.com/cpan_contact.pl>

+1

-1

README less more

0		Locales version 0.20
	0	Locales version 0.21
1	1
2	2	DOCUMENTATION
3	3

+1

-1

_build/_locales_build_utils.pm less more

47	47	}
48	48	}
49	49
50		my $v_offset = '0.12';
	50	my $v_offset = '0.13';
51	51	my $mod_version = $Locales::VERSION - $v_offset;
52	52	my $cldr_version = $Locales::cldr_version;
53	53	my $cldr_db_path;

+2

-2

lib/Locales.pm less more

3	3	# use strict;
4	4	# use warnings;
5	5
6		$Locales::VERSION = '0.20'; # change in POD
	6	$Locales::VERSION = '0.21'; # change in POD
7	7	$Locales::cldr_version = '2.0'; # change in POD
8	8
9	9	#### class methods ####

934	934
935	935	=head1 VERSION
936	936
937		This document describes Locales version 0.20
	937	This document describes Locales version 0.21
938	938
939	939	=head1 SYNOPSIS
940	940

+7

-5

t/04.locales_obj.t less more

84	84	is( $t->get_formatted_decimal( 1234567890.12345, 3 ), '1,234,567,890.123', 'max - no round - basic dec - num' );
85	85	is( $t->get_formatted_decimal( '1234567890.12345', 3 ), '1,234,567,890.123', 'max - no round - basic dec - str' );
86	86	is( $t->get_formatted_decimal( -1234567890.12345, 3 ), '-1,234,567,890.123', 'max - no round - basic dec negative - num' );
87		is( $t->get_formatted_decimal( '-1234567890.12345', 4 ), '-1,234,567,890.1235', 'max - no round - basic dec negative - str' );
88		is( $t->get_formatted_decimal( 1234567890.12345, 4 ), '1,234,567,890.1235', 'max - round - basic dec - num' );
89		is( $t->get_formatted_decimal( '1234567890.12345', 4 ), '1,234,567,890.1235', 'max - round - basic dec - str' );
90		is( $t->get_formatted_decimal( -1234567890.12345, 4 ), '-1,234,567,890.1235', 'max - round - basic dec negative - num' );
91		is( $t->get_formatted_decimal( '-1234567890.12345', 4 ), '-1,234,567,890.1235', 'max - round - basic dec negative - str' );
	87
	88	# use like() instead of is() here due to numeric behavior and nvsize issues (see rt 72788)
	89	like( $t->get_formatted_decimal( '-1234567890.12345', 4 ), qr/^-1,234,567,890\.123[45]$/, 'max - no round - basic dec negative - str' );
	90	like( $t->get_formatted_decimal( 1234567890.12345, 4 ), qr/^1,234,567,890\.123[45]$/, 'max - round - basic dec - num' );
	91	like( $t->get_formatted_decimal( '1234567890.12345', 4 ), qr/^1,234,567,890\.123[45]$/, 'max - round - basic dec - str' );
	92	like( $t->get_formatted_decimal( -1234567890.12345, 4 ), qr/^-1,234,567,890\.123[45]$/, 'max - round - basic dec negative - num' );
	93	like( $t->get_formatted_decimal( '-1234567890.12345', 4 ), qr/^-1,234,567,890\.123[45]$/, 'max - round - basic dec negative - str' );
92	94
93	95	like( $t->get_formatted_decimal(99999999999999999983222787.1234), qr/e/i, 'exponential number is passed through' );
94	96	is( $t->get_formatted_decimal("99999999999999999983222787.1234"), '99,999,999,999,999,999,983,222,787.1234', 'exponential number as string is formatted' );

+1

-1

t/042.aa.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::aa::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::aa::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::aa::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'aa languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'aa territories contains en' );

+1

-1

t/042.af.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::af::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::af::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::af::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'af languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'af territories contains en' );

+1

-1

t/042.agq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::agq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::agq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::agq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'agq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'agq territories contains en' );

+1

-1

t/042.ak.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ak::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ak::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ak::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ak languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ak territories contains en' );

+1

-1

t/042.am.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::am::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::am::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::am::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'am languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'am territories contains en' );

+1

-1

t/042.ar.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ar::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ar::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ar::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ar languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ar territories contains en' );

+1

-1

t/042.as.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::as::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::as::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::as::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'as languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'as territories contains en' );

+1

-1

t/042.asa.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::asa::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::asa::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::asa::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'asa languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'asa territories contains en' );

+1

-1

t/042.az.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::az::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::az::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::az::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'az languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'az territories contains en' );

+1

-1

t/042.bas.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bas::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bas::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bas::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bas languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bas territories contains en' );

+1

-1

t/042.be.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::be::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::be::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::be::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'be languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'be territories contains en' );

+1

-1

t/042.bem.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bem::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bem::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bem::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bem languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bem territories contains en' );

+1

-1

t/042.bez.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bez::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bez::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bez::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bez languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bez territories contains en' );

+1

-1

t/042.bg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bg territories contains en' );

+1

-1

t/042.bm.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bm::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bm::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bm::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bm languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bm territories contains en' );

+1

-1

t/042.bn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bn territories contains en' );

+1

-1

t/042.bo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bo territories contains en' );

+1

-1

t/042.br.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::br::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::br::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::br::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'br languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'br territories contains en' );

+1

-1

t/042.brx.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::brx::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::brx::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::brx::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'brx languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'brx territories contains en' );

+1

-1

t/042.bs.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::bs::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::bs::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::bs::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'bs languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'bs territories contains en' );

+1

-1

t/042.byn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::byn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::byn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::byn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'byn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'byn territories contains en' );

+1

-1

t/042.ca.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ca::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ca::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ca::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ca languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ca territories contains en' );

+1

-1

t/042.cch.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::cch::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::cch::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::cch::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'cch languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'cch territories contains en' );

+1

-1

t/042.cgg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::cgg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::cgg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::cgg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'cgg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'cgg territories contains en' );

+1

-1

t/042.chr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::chr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::chr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::chr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'chr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'chr territories contains en' );

+1

-1

t/042.cs.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::cs::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::cs::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::cs::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'cs languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'cs territories contains en' );

+1

-1

t/042.cy.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::cy::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::cy::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::cy::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'cy languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'cy territories contains en' );

+1

-1

t/042.da.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::da::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::da::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::da::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'da languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'da territories contains en' );

+1

-1

t/042.dav.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::dav::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::dav::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::dav::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'dav languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'dav territories contains en' );

+1

-1

t/042.de.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::de::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::de::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::de::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'de languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'de territories contains en' );

+1

-1

t/042.de_at.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::de_at::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::de_at::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::de_at::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'de_at languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'de_at territories contains en' );

+1

-1

t/042.de_ch.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::de_ch::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::de_ch::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::de_ch::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'de_ch languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'de_ch territories contains en' );

+1

-1

t/042.dje.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::dje::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::dje::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::dje::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'dje languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'dje territories contains en' );

+1

-1

t/042.dua.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::dua::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::dua::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::dua::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'dua languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'dua territories contains en' );

+1

-1

t/042.dyo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::dyo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::dyo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::dyo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'dyo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'dyo territories contains en' );

+1

-1

t/042.dz.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::dz::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::dz::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::dz::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'dz languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'dz territories contains en' );

+1

-1

t/042.ebu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ebu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ebu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ebu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ebu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ebu territories contains en' );

+1

-1

t/042.ee.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ee::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ee::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ee::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ee languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ee territories contains en' );

+1

-1

t/042.el.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::el::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::el::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::el::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'el languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'el territories contains en' );

+1

-1

t/042.en.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::en::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::en::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::en::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'en languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'en territories contains en' );

+1

-1

t/042.en_au.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::en_au::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::en_au::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::en_au::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'en_au languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'en_au territories contains en' );

+1

-1

t/042.en_ca.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::en_ca::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::en_ca::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::en_ca::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'en_ca languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'en_ca territories contains en' );

+1

-1

t/042.en_gb.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::en_gb::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::en_gb::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::en_gb::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'en_gb languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'en_gb territories contains en' );

+1

-1

t/042.en_us.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::en_us::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::en_us::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::en_us::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'en_us languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'en_us territories contains en' );

+1

-1

t/042.eo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::eo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::eo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::eo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'eo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'eo territories contains en' );

+1

-1

t/042.es.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::es::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::es::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::es::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'es languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'es territories contains en' );

+1

-1

t/042.es_es.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::es_es::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::es_es::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::es_es::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'es_es languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'es_es territories contains en' );

+1

-1

t/042.et.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::et::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::et::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::et::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'et languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'et territories contains en' );

+1

-1

t/042.eu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::eu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::eu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::eu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'eu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'eu territories contains en' );

+1

-1

t/042.ewo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ewo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ewo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ewo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ewo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ewo territories contains en' );

+1

-1

t/042.fa.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fa::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fa::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fa::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fa languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fa territories contains en' );

+1

-1

t/042.ff.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ff::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ff::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ff::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ff languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ff territories contains en' );

+1

-1

t/042.fi.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fi::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fi::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fi::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fi languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fi territories contains en' );

+1

-1

t/042.fil.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fil::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fil::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fil::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fil languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fil territories contains en' );

+1

-1

t/042.fo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fo territories contains en' );

+1

-1

t/042.fr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fr territories contains en' );

+1

-1

t/042.fr_ca.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fr_ca::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fr_ca::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fr_ca::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fr_ca languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fr_ca territories contains en' );

+1

-1

t/042.fr_ch.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fr_ch::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fr_ch::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fr_ch::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fr_ch languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fr_ch territories contains en' );

+1

-1

t/042.fur.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::fur::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::fur::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::fur::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'fur languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'fur territories contains en' );

+1

-1

t/042.ga.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ga::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ga::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ga::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ga languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ga territories contains en' );

+1

-1

t/042.gaa.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::gaa::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::gaa::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::gaa::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'gaa languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'gaa territories contains en' );

+1

-1

t/042.gl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::gl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::gl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::gl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'gl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'gl territories contains en' );

+1

-1

t/042.gsw.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::gsw::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::gsw::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::gsw::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'gsw languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'gsw territories contains en' );

+1

-1

t/042.gu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::gu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::gu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::gu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'gu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'gu territories contains en' );

+1

-1

t/042.guz.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::guz::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::guz::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::guz::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'guz languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'guz territories contains en' );

+1

-1

t/042.gv.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::gv::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::gv::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::gv::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'gv languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'gv territories contains en' );

+1

-1

t/042.ha.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ha::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ha::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ha::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ha languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ha territories contains en' );

+1

-1

t/042.haw.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::haw::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::haw::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::haw::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'haw languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'haw territories contains en' );

+1

-1

t/042.he.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::he::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::he::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::he::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'he languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'he territories contains en' );

+1

-1

t/042.hi.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::hi::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::hi::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::hi::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'hi languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'hi territories contains en' );

+1

-1

t/042.hr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::hr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::hr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::hr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'hr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'hr territories contains en' );

+1

-1

t/042.hu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::hu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::hu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::hu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'hu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'hu territories contains en' );

+1

-1

t/042.hy.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::hy::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::hy::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::hy::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'hy languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'hy territories contains en' );

+1

-1

t/042.ia.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ia::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ia::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ia::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ia languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ia territories contains en' );

+1

-1

t/042.id.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::id::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::id::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::id::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'id languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'id territories contains en' );

+1

-1

t/042.ig.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ig::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ig::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ig::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ig languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ig territories contains en' );

+1

-1

t/042.ii.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ii::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ii::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ii::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ii languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ii territories contains en' );

+1

-1

t/042.is.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::is::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::is::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::is::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'is languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'is territories contains en' );

+1

-1

t/042.it.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::it::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::it::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::it::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'it languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'it territories contains en' );

+1

-1

t/042.ja.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ja::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ja::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ja::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ja languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ja territories contains en' );

+1

-1

t/042.jmc.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::jmc::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::jmc::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::jmc::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'jmc languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'jmc territories contains en' );

+1

-1

t/042.ka.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ka::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ka::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ka::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ka languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ka territories contains en' );

+1

-1

t/042.kab.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kab::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kab::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kab::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kab languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kab territories contains en' );

+1

-1

t/042.kaj.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kaj::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kaj::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kaj::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kaj languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kaj territories contains en' );

+1

-1

t/042.kam.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kam::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kam::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kam::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kam languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kam territories contains en' );

+1

-1

t/042.kcg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kcg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kcg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kcg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kcg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kcg territories contains en' );

+1

-1

t/042.kde.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kde::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kde::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kde::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kde languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kde territories contains en' );

+1

-1

t/042.kea.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kea::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kea::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kea::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kea languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kea territories contains en' );

+1

-1

t/042.khq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::khq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::khq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::khq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'khq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'khq territories contains en' );

+1

-1

t/042.ki.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ki::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ki::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ki::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ki languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ki territories contains en' );

+1

-1

t/042.kk.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kk::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kk::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kk::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kk languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kk territories contains en' );

+1

-1

t/042.kl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kl territories contains en' );

+1

-1

t/042.kln.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kln::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kln::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kln::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kln languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kln territories contains en' );

+1

-1

t/042.km.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::km::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::km::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::km::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'km languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'km territories contains en' );

+1

-1

t/042.kn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kn territories contains en' );

+1

-1

t/042.ko.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ko::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ko::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ko::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ko languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ko territories contains en' );

+1

-1

t/042.kok.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kok::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kok::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kok::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kok languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kok territories contains en' );

+1

-1

t/042.ksb.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ksb::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ksb::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ksb::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ksb languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ksb territories contains en' );

+1

-1

t/042.ksf.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ksf::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ksf::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ksf::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ksf languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ksf territories contains en' );

+1

-1

t/042.ksh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ksh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ksh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ksh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ksh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ksh territories contains en' );

+1

-1

t/042.ku.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ku::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ku::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ku::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ku languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ku territories contains en' );

+1

-1

t/042.kw.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::kw::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::kw::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::kw::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'kw languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'kw territories contains en' );

+1

-1

t/042.ky.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ky::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ky::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ky::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ky languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ky territories contains en' );

+1

-1

t/042.lag.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lag::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lag::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lag::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lag languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lag territories contains en' );

+1

-1

t/042.lg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lg territories contains en' );

+1

-1

t/042.ln.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ln::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ln::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ln::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ln languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ln territories contains en' );

+1

-1

t/042.lo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lo territories contains en' );

+1

-1

t/042.lt.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lt::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lt::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lt::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lt languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lt territories contains en' );

+1

-1

t/042.lu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lu territories contains en' );

+1

-1

t/042.luo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::luo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::luo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::luo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'luo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'luo territories contains en' );

+1

-1

t/042.luy.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::luy::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::luy::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::luy::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'luy languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'luy territories contains en' );

+1

-1

t/042.lv.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::lv::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::lv::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::lv::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'lv languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'lv territories contains en' );

+1

-1

t/042.mas.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mas::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mas::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mas::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mas languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mas territories contains en' );

+1

-1

t/042.mer.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mer::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mer::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mer::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mer languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mer territories contains en' );

+1

-1

t/042.mfe.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mfe::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mfe::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mfe::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mfe languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mfe territories contains en' );

+1

-1

t/042.mg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mg territories contains en' );

+1

-1

t/042.mgh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mgh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mgh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mgh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mgh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mgh territories contains en' );

+1

-1

t/042.mk.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mk::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mk::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mk::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mk languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mk territories contains en' );

+1

-1

t/042.ml.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ml::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ml::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ml::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ml languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ml territories contains en' );

+1

-1

t/042.mn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mn territories contains en' );

+1

-1

t/042.mo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mo territories contains en' );

+1

-1

t/042.mr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mr territories contains en' );

+1

-1

t/042.ms.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ms::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ms::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ms::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ms languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ms territories contains en' );

+1

-1

t/042.mt.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mt::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mt::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mt::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mt languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mt territories contains en' );

+1

-1

t/042.mua.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::mua::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::mua::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::mua::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'mua languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'mua territories contains en' );

+1

-1

t/042.my.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::my::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::my::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::my::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'my languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'my territories contains en' );

+1

-1

t/042.naq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::naq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::naq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::naq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'naq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'naq territories contains en' );

+1

-1

t/042.nb.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nb::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nb::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nb::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nb languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nb territories contains en' );

+1

-1

t/042.nd.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nd::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nd::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nd::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nd languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nd territories contains en' );

+1

-1

t/042.nds.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nds::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nds::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nds::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nds languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nds territories contains en' );

+1

-1

t/042.ne.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ne::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ne::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ne::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ne languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ne territories contains en' );

+1

-1

t/042.nl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nl territories contains en' );

+1

-1

t/042.nl_be.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nl_be::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nl_be::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nl_be::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nl_be languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nl_be territories contains en' );

+1

-1

t/042.nmg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nmg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nmg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nmg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nmg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nmg territories contains en' );

+1

-1

t/042.nn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nn territories contains en' );

+1

-1

t/042.no.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::no::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::no::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::no::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'no languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'no territories contains en' );

+1

-1

t/042.nr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nr territories contains en' );

+1

-1

t/042.nso.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nso::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nso::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nso::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nso languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nso territories contains en' );

+1

-1

t/042.nus.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nus::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nus::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nus::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nus languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nus territories contains en' );

+1

-1

t/042.nyn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::nyn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::nyn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::nyn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'nyn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'nyn territories contains en' );

+1

-1

t/042.oc.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::oc::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::oc::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::oc::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'oc languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'oc territories contains en' );

+1

-1

t/042.om.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::om::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::om::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::om::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'om languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'om territories contains en' );

+1

-1

t/042.or.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::or::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::or::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::or::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'or languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'or territories contains en' );

+1

-1

t/042.pa.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::pa::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::pa::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::pa::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'pa languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'pa territories contains en' );

+1

-1

t/042.pl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::pl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::pl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::pl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'pl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'pl territories contains en' );

+1

-1

t/042.ps.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ps::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ps::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ps::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ps languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ps territories contains en' );

+1

-1

t/042.pt.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::pt::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::pt::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::pt::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'pt languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'pt territories contains en' );

+1

-1

t/042.pt_br.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::pt_br::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::pt_br::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::pt_br::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'pt_br languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'pt_br territories contains en' );

+1

-1

t/042.pt_pt.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::pt_pt::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::pt_pt::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::pt_pt::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'pt_pt languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'pt_pt territories contains en' );

+1

-1

t/042.rm.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::rm::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::rm::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::rm::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'rm languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'rm territories contains en' );

+1

-1

t/042.rn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::rn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::rn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::rn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'rn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'rn territories contains en' );

+1

-1

t/042.ro.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ro::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ro::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ro::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ro languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ro territories contains en' );

+1

-1

t/042.rof.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::rof::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::rof::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::rof::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'rof languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'rof territories contains en' );

+1

-1

t/042.ru.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ru::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ru::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ru::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ru languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ru territories contains en' );

+1

-1

t/042.rw.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::rw::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::rw::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::rw::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'rw languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'rw territories contains en' );

+1

-1

t/042.rwk.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::rwk::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::rwk::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::rwk::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'rwk languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'rwk territories contains en' );

+1

-1

t/042.sah.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sah::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sah::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sah::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sah languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sah territories contains en' );

+1

-1

t/042.saq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::saq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::saq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::saq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'saq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'saq territories contains en' );

+1

-1

t/042.sbp.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sbp::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sbp::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sbp::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sbp languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sbp territories contains en' );

+1

-1

t/042.se.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::se::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::se::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::se::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'se languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'se territories contains en' );

+1

-1

t/042.seh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::seh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::seh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::seh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'seh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'seh territories contains en' );

+1

-1

t/042.ses.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ses::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ses::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ses::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ses languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ses territories contains en' );

+1

-1

t/042.sg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sg territories contains en' );

+1

-1

t/042.sh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sh territories contains en' );

+1

-1

t/042.shi.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::shi::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::shi::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::shi::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'shi languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'shi territories contains en' );

+1

-1

t/042.si.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::si::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::si::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::si::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'si languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'si territories contains en' );

+1

-1

t/042.sid.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sid::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sid::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sid::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sid languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sid territories contains en' );

+1

-1

t/042.sk.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sk::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sk::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sk::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sk languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sk territories contains en' );

+1

-1

t/042.sl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sl territories contains en' );

+1

-1

t/042.sn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sn territories contains en' );

+1

-1

t/042.so.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::so::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::so::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::so::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'so languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'so territories contains en' );

+1

-1

t/042.sq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sq territories contains en' );

+1

-1

t/042.sr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sr territories contains en' );

+1

-1

t/042.ss.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ss::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ss::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ss::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ss languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ss territories contains en' );

+1

-1

t/042.ssy.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ssy::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ssy::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ssy::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ssy languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ssy territories contains en' );

+1

-1

t/042.st.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::st::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::st::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::st::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'st languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'st territories contains en' );

+1

-1

t/042.sv.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sv::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sv::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sv::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sv languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sv territories contains en' );

+1

-1

t/042.sw.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::sw::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::sw::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::sw::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'sw languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'sw territories contains en' );

+1

-1

t/042.swc.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::swc::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::swc::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::swc::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'swc languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'swc territories contains en' );

+1

-1

t/042.ta.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ta::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ta::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ta::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ta languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ta territories contains en' );

+1

-1

t/042.te.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::te::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::te::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::te::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'te languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'te territories contains en' );

+1

-1

t/042.teo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::teo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::teo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::teo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'teo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'teo territories contains en' );

+1

-1

t/042.tg.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tg::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tg::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tg::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tg languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tg territories contains en' );

+1

-1

t/042.th.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::th::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::th::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::th::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'th languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'th territories contains en' );

+1

-1

t/042.ti.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ti::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ti::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ti::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ti languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ti territories contains en' );

+1

-1

t/042.tig.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tig::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tig::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tig::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tig languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tig territories contains en' );

+1

-1

t/042.tl.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tl::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tl::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tl::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tl languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tl territories contains en' );

+1

-1

t/042.tn.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tn::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tn::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tn::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tn languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tn territories contains en' );

+1

-1

t/042.to.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::to::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::to::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::to::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'to languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'to territories contains en' );

+1

-1

t/042.tr.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tr::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tr::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tr::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tr languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tr territories contains en' );

+1

-1

t/042.trv.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::trv::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::trv::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::trv::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'trv languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'trv territories contains en' );

+1

-1

t/042.ts.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ts::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ts::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ts::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ts languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ts territories contains en' );

+1

-1

t/042.twq.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::twq::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::twq::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::twq::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'twq languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'twq territories contains en' );

+1

-1

t/042.tzm.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::tzm::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::tzm::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::tzm::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'tzm languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'tzm territories contains en' );

+1

-1

t/042.uk.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::uk::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::uk::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::uk::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'uk languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'uk territories contains en' );

+1

-1

t/042.ur.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ur::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ur::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ur::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'ur languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'ur territories contains en' );

+1

-1

t/042.uz.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::uz::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::uz::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::uz::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'uz languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'uz territories contains en' );

+1

-1

t/042.vai.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::vai::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::vai::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::vai::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'vai languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'vai territories contains en' );

+1

-1

t/042.ve.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::ve::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::ve::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::ve::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 've languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 've territories contains en' );

+1

-1

t/042.vi.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::vi::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::vi::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::vi::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'vi languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'vi territories contains en' );

+1

-1

t/042.vun.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::vun::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::vun::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::vun::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'vun languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'vun territories contains en' );

+1

-1

t/042.wae.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::wae::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::wae::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::wae::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'wae languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'wae territories contains en' );

+1

-1

t/042.wal.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::wal::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::wal::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::wal::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'wal languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'wal territories contains en' );

+1

-1

t/042.xh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::xh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::xh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::xh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'xh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'xh territories contains en' );

+1

-1

t/042.xog.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::xog::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::xog::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::xog::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'xog languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'xog territories contains en' );

+1

-1

t/042.yav.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::yav::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::yav::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::yav::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'yav languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'yav territories contains en' );

+1

-1

t/042.yo.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::yo::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::yo::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::yo::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'yo languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'yo territories contains en' );

+1

-1

t/042.zh.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::zh::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::zh::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::zh::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'zh languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'zh territories contains en' );

+1

-1

t/042.zu.t less more

25	25	@lang_lu{@my_lang_codes} = ();
26	26	@terr_lu{@my_terr_codes} = ();
27	27	ok( $Locales::DB::Language::zu::cldr_version eq $Locales::cldr_version, 'CLDR version is correct' );
28		ok( $Locales::DB::Language::zu::VERSION eq ( $Locales::VERSION - 0.12 ), 'VERSION is correct' );
	28	ok( $Locales::DB::Language::zu::VERSION eq ( $Locales::VERSION - 0.13 ), 'VERSION is correct' );
29	29
30	30	ok( !( grep { !exists $lang_lu{$_} } @en_lang_codes ), 'zu languages contains en' );
31	31	ok( !( grep { !exists $terr_lu{$_} } @en_terr_codes ), 'zu territories contains en' );