|
extends('Locale::CLDR::En::Any');
has 'display_name_language' => (
is => 'ro',
isa => 'CodeRef',
init_arg => undef,
default => sub {
sub {
my %languages = (
'en_US' => 'US English',
);
if (@_) {
return $languages{$_[0]};
}
return \%languages;
}
},
);
has 'display_name_script' => (
is => 'ro',
isa => 'CodeRef',
init_arg => undef,
default => sub {
sub {
my %scripts = (
'Thai' => 'Thai',
);
if ( @_ ) {
return $scripts{$_[0]};
}
return \%scripts;
}
}
);
has 'display_name_territory' => (
is => 'ro',
isa => 'HashRef[Str]',
init_arg => undef,
default => sub {
{
'GB@alt=short' => 'U.K.',
'US@alt=short' => 'U.S.',
}
},
);
has 'number_currency_formats' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'latn' => {
'pattern' => {
'default' => {
'standard' => {
'negative' => '¤#,##0.00',
'positive' => '¤#,##0.00',
},
},
},
},
} },
);
has 'curriencies' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'AUD' => {
symbol => '$',
},
'EUR' => {
display_name => {
'currency' => q(Euro),
'one' => q(euro),
'other' => q(euro),
},
},
'USD' => {
symbol => 'US$',
},
} },
);
has 'day_period_data' => (
traits => ['Code'],
is => 'ro',
isa => 'CodeRef',
init_arg => undef,
handles => { call => 'execute_method' },
default => sub { sub {
my ($self, $type, $time) = @_;
SWITCH:
for ($type) {
if ($_ eq 'chinese') {
return 'pm' if $time > 1200
&& $time < 2400;
return 'am' if $time >= 000
&& $time < 1200;
return 'noon' if $time == 1200;
last SWITCH;
}
if ($_ eq 'japanese') {
return 'pm' if $time > 1200
&& $time < 2400;
return 'am' if $time >= 000
&& $time < 1200;
return 'noon' if $time == 1200;
last SWITCH;
}
if ($_ eq 'generic') {
return 'pm' if $time > 1200
&& $time < 2400;
return 'am' if $time >= 000
&& $time < 1200;
return 'noon' if $time == 1200;
last SWITCH;
}
if ($_ eq 'islamic') {
return 'pm' if $time > 1200
&& $time < 2400;
return 'am' if $time >= 000
&& $time < 1200;
return 'noon' if $time == 1200;
last SWITCH;
}
if ($_ eq 'gregorian') {
return 'pm' if $time > 1200
&& $time < 2400;
return 'am' if $time >= 000
&& $time < 1200;
return 'noon' if $time == 1200;
last SWITCH;
}
}
} },
);
has 'eras' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'chinese' => {
},
'generic' => {
},
'gregorian' => {
},
'islamic' => {
},
'japanese' => {
},
} },
);
has 'date_formats' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'chinese' => {
'full' => q{EEEE, d MMMM U},
'long' => q{d MMMM U},
'medium' => q{d MMM U},
'short' => q{d/MM/yy},
},
'generic' => {
'full' => q{EEEE, d MMMM y G},
'long' => q{d MMMM y G},
'medium' => q{d MMM y G},
'short' => q{d/MM/y GGGGG},
},
'gregorian' => {
'full' => q{EEEE, d MMMM y},
'long' => q{d MMMM y},
'medium' => q{d MMM y},
'short' => q{d/MM/y},
},
'islamic' => {
'full' => q{EEEE, d MMMM y G},
'long' => q{d MMMM y G},
'medium' => q{d MMM y G},
'short' => q{d/MM/y GGGGG},
},
'japanese' => {
'full' => q{EEEE, d MMMM y G},
'long' => q{d MMMM y G},
'medium' => q{dd/MM/y G},
'short' => q{d/MM/yy GGGGG},
},
} },
);
has 'time_formats' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'chinese' => {
'full' => q{h:mm:ss a zzzz},
'long' => q{h:mm:ss a z},
'medium' => q{h:mm:ss a},
'short' => q{h:mm a},
},
'generic' => {
'full' => q{h:mm:ss a zzzz},
'long' => q{h:mm:ss a z},
'medium' => q{h:mm:ss a},
'short' => q{h:mm a},
},
'gregorian' => {
'full' => q{h:mm:ss a zzzz},
'long' => q{h:mm:ss a z},
'medium' => q{h:mm:ss a},
'short' => q{h:mm a},
},
'islamic' => {
},
'japanese' => {
},
} },
);
has 'datetime_formats' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'chinese' => {
},
'generic' => {
},
'gregorian' => {
},
'islamic' => {
},
'japanese' => {
},
} },
);
has 'datetime_formats_available_formats' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'gregorian' => {
yMEd => q{E, d/M/y},
yMd => q{d/M/y},
},
'generic' => {
yMEd => q{E, d/M/y},
yMd => q{d/M/y},
},
'islamic' => {
yMEd => q{E, d/M/y},
yMd => q{d/M/y},
},
} },
);
has 'datetime_formats_append_item' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
} },
);
has 'datetime_formats_interval' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'gregorian' => {
M => {
M => q{M-M},
},
MEd => {
M => q{E, d/MM - E, d/MM},
d => q{E, d/MM - E, d/MM},
},
MMM => {
M => q{MMM-MMM},
},
MMMEd => {
M => q{E, d MMM - E, d MMM},
d => q{E, d - E, d MMM},
},
MMMd => {
M => q{d MMM - d MMM},
d => q{d-d MMM},
},
Md => {
M => q{d/MM - d/MM},
d => q{d/MM - d/MM},
},
d => {
d => q{d-d},
},
fallback => '{0} - {1}',
h => {
a => q{h a - h a},
h => q{h-h a},
},
hm => {
a => q{h:mm a - h:mm a},
h => q{h:mm-h:mm a},
m => q{h:mm-h:mm a},
},
hmv => {
a => q{h:mm a - h:mm a v},
h => q{h:mm-h:mm a v},
m => q{h:mm-h:mm a v},
},
hv => {
a => q{h a - h a v},
h => q{h-h a v},
},
yM => {
M => q{MM/y - MM/y},
y => q{MM/y - MM/y},
},
yMEd => {
M => q{E, d/MM/y - E, d/MM/y},
d => q{E, d/MM/y - E, d/MM/y},
y => q{E, d/MM/y - E, d/MM/y},
},
yMMM => {
M => q{MMM-MMM y},
y => q{MMM y - MMM y},
},
yMMMEd => {
M => q{E, d MMM - E, d MMM y},
d => q{E, d - E, d MMM y},
y => q{E, d MMM y - E, d MMM y},
},
yMMMd => {
M => q{d MMM - d MMM y},
d => q{d-d MMM y},
y => q{d MMM y - d MMM y},
},
yMd => {
M => q{d/MM/y - d/MM/y},
d => q{d/MM/y - d/MM/y},
y => q{d/MM/y - d/MM/y},
},
},
'generic' => {
M => {
M => q{M-M},
},
MEd => {
M => q{E, d/MM - E, d/MM},
d => q{E, d/MM - E, d/MM},
},
MMM => {
M => q{MMM-MMM},
},
MMMEd => {
M => q{E, d MMM - E, d MMM},
d => q{E, d - E, d MMM},
},
MMMd => {
M => q{d MMM - d MMM},
d => q{d-d MMM},
},
d => {
d => q{d-d},
},
fallback => '{0} - {1}',
h => {
a => q{h a - h a},
h => q{h-h a},
},
hm => {
a => q{h:mm a - h:mm a},
h => q{h:mm-h:mm a},
m => q{h:mm-h:mm a},
},
hmv => {
a => q{h:mm a - h:mm a v},
h => q{h:mm-h:mm a v},
m => q{h:mm-h:mm a v},
},
hv => {
a => q{h a - h a v},
h => q{h-h a v},
},
yM => {
M => q{MM/y - MM/y},
y => q{MM/y - MM/y},
},
yMEd => {
M => q{E, d/MM/y - E, d/MM/y},
d => q{E, d/MM/y - E, d/MM/y},
y => q{E, d/MM/y - E, d/MM/y},
},
yMMM => {
M => q{MMM-MMM y},
y => q{MMM y - MMM y},
},
yMMMEd => {
M => q{E, d MMM - E, d MMM y},
d => q{E, d - E, d MMM y},
y => q{E, d MMM y - E, d MMM y},
},
yMMMd => {
M => q{d MMM - d MMM y},
d => q{d-d MMM y},
y => q{d MMM y - d MMM y},
},
yMd => {
M => q{d/MM/y - d/MM/y},
d => q{d/MM/y - d/MM/y},
y => q{d/MM/y - d/MM/y},
},
},
} },
);
has 'time_zone_names' => (
is => 'ro',
isa => 'HashRef',
init_arg => undef,
default => sub { {
'Australia_Central' => {
short => {
'daylight' => q(ACDT),
'generic' => q(ACT),
'standard' => q(ACST),
},
},
'Australia_CentralWestern' => {
short => {
'daylight' => q(ACWDT),
'generic' => q(ACWT),
'standard' => q(ACWST),
},
},
'Australia_Eastern' => {
short => {
'daylight' => q(AEDT),
'generic' => q(AET),
'standard' => q(AEST),
},
},
'Australia_Western' => {
short => {
'daylight' => q(AWDT),
'generic' => q(AWT),
'standard' => q(AWST),
},
},
'Europe_Central' => {
short => {
'daylight' => q(∅∅∅),
'generic' => q(∅∅∅),
'standard' => q(∅∅∅),
},
},
'Europe_Eastern' => {
short => {
'daylight' => q(∅∅∅),
'generic' => q(∅∅∅),
'standard' => q(∅∅∅),
},
},
'Europe_Western' => {
short => {
'daylight' => q(∅∅∅),
'generic' => q(∅∅∅),
'standard' => q(∅∅∅),
},
},
'Lord_Howe' => {
short => {
'daylight' => q(LHDT),
'generic' => q(LHT),
'standard' => q(LHST),
},
},
'New_Zealand' => {
short => {
'daylight' => q(NZDT),
'generic' => q(NZT),
'standard' => q(NZST),
},
},
} }
);
no Moose;
__PACKAGE__->meta->make_immutable;
1;
|