— |
our $VERSION = version->declare( 'v0.33.1' );
use if $^V ge v5.12.0, feature => 'unicode_strings' ;
extends ( 'Locale::CLDR::Locales::Sr::Cyrl' );
has 'display_name_language' => (
is => 'ro' ,
isa => CodeRef,
init_arg => undef ,
default => sub {
sub {
my %languages = (
'arn' => 'мапудунгун' ,
'be' => 'бјелоруски' ,
'bm' => 'бамананкан' ,
'bn' => 'бангла' ,
'gsw' => 'швајцарски немачки' ,
'ht' => 'хаићански креолски' ,
'lo' => 'лаошки' ,
'moh' => 'мохок' ,
'nqo' => 'н’ко' ,
'shi' => 'јужни шилха' ,
'si' => 'синхалски' ,
'tzm' => 'централноатласки тамашек' ,
'xh' => 'исикоса' ,
'zgh' => 'стандардни марокански тамашек' ,
'zu' => 'исизулу' ,
);
if ( @_ ) {
return $languages { $_ [0]};
}
return \ %languages ;
}
},
);
has 'display_name_region' => (
is => 'ro' ,
isa => HashRef[Str],
init_arg => undef ,
default => sub {
{
'BY' => 'Бјелорусија' ,
'CG' => 'Конго' ,
'CV' => 'Кабо Верде' ,
'CZ' => 'Чешка Република' ,
'DE' => 'Њемачка' ,
'KN' => 'Свети Китс и Невис' ,
'MK@alt=variant' => 'БЈР Македонија' ,
'MO' => 'САР Макао' ,
'PM' => 'Свети Пјер и Микелон' ,
'RE' => 'Реунион' ,
'UM' => 'Мања удаљена острва САД' ,
'VC' => 'Свети Винсент и Гренадини' ,
'VG' => 'Британска Дјевичанска Острва' ,
'VI' => 'Америчка Дјевичанска Острва' ,
}
},
);
has 'calendar_months' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
'format' => {
abbreviated => {
nonleap => [
'јан.' ,
'феб.' ,
'март' ,
'апр.' ,
'мај' ,
'јун' ,
'јул' ,
'авг.' ,
'септ.' ,
'окт.' ,
'нов.' ,
'дец.'
],
leap => [
],
},
},
'stand-alone' => {
abbreviated => {
nonleap => [
'јан.' ,
'феб.' ,
'март' ,
'апр.' ,
'мај' ,
'јун' ,
'јул' ,
'авг.' ,
'септ.' ,
'окт.' ,
'нов.' ,
'дец.'
],
leap => [
],
},
},
},
} },
);
has 'calendar_days' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
'format' => {
abbreviated => {
mon => 'пон.' ,
tue => 'ут.' ,
wed => 'ср.' ,
thu => 'чет.' ,
fri => 'пет.' ,
sat => 'суб.' ,
sun => 'нед.'
},
wide => {
mon => 'понедељак' ,
tue => 'уторак' ,
wed => 'сриједа' ,
thu => 'четвртак' ,
fri => 'петак' ,
sat => 'субота' ,
sun => 'недјеља'
},
},
'stand-alone' => {
abbreviated => {
mon => 'пон.' ,
tue => 'ут.' ,
wed => 'ср.' ,
thu => 'чет.' ,
fri => 'пет.' ,
sat => 'суб.' ,
sun => 'нед.'
},
wide => {
mon => 'понедељак' ,
tue => 'уторак' ,
wed => 'сриједа' ,
thu => 'четвртак' ,
fri => 'петак' ,
sat => 'субота' ,
sun => 'недјеља'
},
},
},
} },
);
has 'day_period_data' => (
is => 'ro' ,
isa => CodeRef,
init_arg => undef ,
default => sub { sub {
my ( $self , $type , $time , $day_period_type ) = @_ ;
$day_period_type //= 'default' ;
SWITCH:
for ( $type ) {
if ( $_ eq 'generic' ) {
if ( $day_period_type eq 'default' ) {
return 'midnight' if $time == 0;
return 'noon' if $time == 1200;
return 'afternoon1' if $time >= 1200
&& $time < 1800;
return 'night1' if $time >= 2100;
return 'night1' if $time < 600;
return 'morning1' if $time >= 600
&& $time < 1200;
return 'evening1' if $time >= 1800
&& $time < 2100;
}
if ( $day_period_type eq 'selection' ) {
return 'evening1' if $time >= 1800
&& $time < 2100;
return 'night1' if $time >= 2100;
return 'night1' if $time < 600;
return 'morning1' if $time >= 600
&& $time < 1200;
return 'afternoon1' if $time >= 1200
&& $time < 1800;
}
last SWITCH;
}
if ( $_ eq 'gregorian' ) {
if ( $day_period_type eq 'default' ) {
return 'midnight' if $time == 0;
return 'noon' if $time == 1200;
return 'afternoon1' if $time >= 1200
&& $time < 1800;
return 'night1' if $time >= 2100;
return 'night1' if $time < 600;
return 'morning1' if $time >= 600
&& $time < 1200;
return 'evening1' if $time >= 1800
&& $time < 2100;
}
if ( $day_period_type eq 'selection' ) {
return 'evening1' if $time >= 1800
&& $time < 2100;
return 'night1' if $time >= 2100;
return 'night1' if $time < 600;
return 'morning1' if $time >= 600
&& $time < 1200;
return 'afternoon1' if $time >= 1200
&& $time < 1800;
}
last SWITCH;
}
}
} },
);
around day_period_data => sub {
my ( $orig , $self ) = @_ ;
return $self -> $orig ;
};
has 'day_periods' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
'format' => {
'wide' => {
'am' => q{прије подне} ,
'pm' => q{по подне} ,
},
'narrow' => {
'evening1' => q{вече} ,
'night1' => q{ноћ} ,
'midnight' => q{поноћ} ,
'morning1' => q{јутро} ,
'noon' => q{подне} ,
'afternoon1' => q{по под.} ,
},
'abbreviated' => {
'am' => q{прије подне} ,
'afternoon1' => q{по под.} ,
'night1' => q{ноћу} ,
'evening1' => q{вече} ,
'morning1' => q{јутро} ,
'midnight' => q{поноћ} ,
'noon' => q{подне} ,
'pm' => q{по подне} ,
},
},
'stand-alone' => {
'abbreviated' => {
'am' => q{прије подне} ,
'pm' => q{по подне} ,
},
'narrow' => {
'am' => q{а} ,
'pm' => q{p} ,
},
'wide' => {
'pm' => q{по подне} ,
'am' => q{прије подне} ,
},
},
},
} },
);
has 'eras' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'generic' => {
},
'gregorian' => {
wide => {
'0' => 'прије нове ере'
},
},
} },
);
has 'date_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'generic' => {
},
'gregorian' => {
},
} },
);
has 'time_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'generic' => {
},
'gregorian' => {
},
} },
);
has 'datetime_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'generic' => {
},
'gregorian' => {
},
} },
);
has 'datetime_formats_available_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
MMMMW => q{W. 'сједмица' 'у' MMM} ,
yw => q{w. 'сједмица' 'у' 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 { {
'generic' => {
MMMEd => {
M => q{E, d. MMM – E, d. MMM} ,
d => q{E, d. MMM – E, d. MMM} ,
},
yMd => {
M => q{d.M.y. – d.M.y. GGGGG} ,
},
},
'gregorian' => {
MEd => {
M => q{E, MM-dd – E, MM-dd} ,
d => q{E, MM-dd – E, MM-dd} ,
},
Md => {
M => q{MM-dd – MM-dd} ,
d => q{MM-dd – MM-dd} ,
},
yM => {
M => q{y-MM – y-MM} ,
y => q{y-MM – y-MM} ,
},
yMEd => {
M => q{E, y-MM-dd – E, y-MM-dd} ,
d => q{E, y-MM-dd – E, y-MM-dd} ,
y => q{E, y-MM-dd – E, y-MM-dd} ,
},
yMd => {
M => q{y-MM-dd – y-MM-dd} ,
d => q{y-MM-dd – y-MM-dd} ,
y => q{y-MM-dd – y-MM-dd} ,
},
},
} },
);
no Moo;
1;
|