our
$VERSION
= version->declare(
'v0.34.4'
);
use
if
$^V ge v5.12.0,
feature
=>
'unicode_strings'
;
extends
(
'Locale::CLDR::Locales::Ru::Any'
);
has
'display_name_region'
=> (
is
=>
'ro'
,
isa
=> HashRef[Str],
init_arg
=>
undef
,
default
=>
sub
{
{
'AC'
=>
'О-в Вознесения'
,
'AE'
=>
'Объединенные Арабские Эмираты'
,
'BV'
=>
'О-в Буве'
,
'CK'
=>
'О-ва Кука'
,
'CP'
=>
'О-в Клиппертон'
,
'CX'
=>
'О-в Рождества'
,
'HM'
=>
'О-ва Херд и Макдональд'
,
'NF'
=>
'О-в Норфолк'
,
'TL'
=>
'Тимор-Лесте'
,
'UM'
=>
'Малые Тихоокеанские Отдаленные Острова США'
,
}
},
);
has
'minimum_grouping_digits'
=> (
is
=>
'ro'
,
isa
=> Int,
init_arg
=>
undef
,
default
=> 2,
);
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
'evening1'
if
$time
>= 1800
&&
$time
< 2400;
return
'morning1'
if
$time
>= 400
&&
$time
< 1200;
return
'night1'
if
$time
>= 0
&&
$time
< 400;
}
if
(
$day_period_type
eq
'selection'
) {
return
'afternoon1'
if
$time
>= 1200
&&
$time
< 1800;
return
'evening1'
if
$time
>= 1800
&&
$time
< 2400;
return
'morning1'
if
$time
>= 400
&&
$time
< 1200;
return
'night1'
if
$time
>= 0
&&
$time
< 400;
}
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
'evening1'
if
$time
>= 1800
&&
$time
< 2400;
return
'morning1'
if
$time
>= 400
&&
$time
< 1200;
return
'night1'
if
$time
>= 0
&&
$time
< 400;
}
if
(
$day_period_type
eq
'selection'
) {
return
'afternoon1'
if
$time
>= 1200
&&
$time
< 1800;
return
'evening1'
if
$time
>= 1800
&&
$time
< 2400;
return
'morning1'
if
$time
>= 400
&&
$time
< 1200;
return
'night1'
if
$time
>= 0
&&
$time
< 400;
}
last
SWITCH;
}
}
} },
);
around
day_period_data
=>
sub
{
my
(
$orig
,
$self
) =
@_
;
return
$self
->
$orig
;
};
has
'eras'
=> (
is
=>
'ro'
,
isa
=> HashRef,
init_arg
=>
undef
,
default
=>
sub
{ {
'generic'
=> {
},
'gregorian'
=> {
},
} },
);
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'
=> {
GyMMM
=>
q{LLL y 'г'. G}
,
yMEd
=>
q{ccc, d.MM.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'
=> {
H
=> {
H
=>
q{HH–HH 'ч'.}
,
},
Hv
=> {
H
=>
q{HH–HH 'ч'., v}
,
},
MMMEd
=> {
M
=>
q{E, d MMM – E, d MMM}
,
d
=>
q{E, d – E, d MMM}
,
},
h
=> {
h
=>
q{h–h 'ч'. a}
,
},
hv
=> {
h
=>
q{h–h 'ч'. a, v}
,
},
yMEd
=> {
M
=>
q{E, dd.MM.y – E, dd.MM.y}
,
d
=>
q{E, dd.MM.y – E, dd.MM.y}
,
y
=>
q{E, dd.MM.y – E, dd.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 'г'.}
,
},
yMMMM
=> {
M
=>
q{LLLL–LLLL y}
,
y
=>
q{LLLL y – LLLL y}
,
},
yMMMd
=> {
M
=>
q{d MMM – d MMM y}
,
d
=>
q{d–d MMM y}
,
y
=>
q{d MMM y – d MMM y}
,
},
},
'gregorian'
=> {
yMMM
=> {
y
=>
q{LLL y – LLL y}
,
},
yMMMEd
=> {
y
=>
q{ccc, d MMM y – ccc, d MMM y}
,
},
yMMMM
=> {
y
=>
q{LLLL y – LLLL y}
,
},
yMMMd
=> {
y
=>
q{d MMM y – d MMM y}
,
},
},
} },
);
no
Moo;
1;