— |
our $VERSION = version->declare( 'v0.40.0' );
use if $^V ge v5.12.0, feature => 'unicode_strings' ;
extends ( 'Locale::CLDR::Locales::Sv::Any' );
has 'display_name_script' => (
is => 'ro' ,
isa => CodeRef,
init_arg => undef ,
default => sub {
sub {
my %scripts = (
'Arab@alt=variant' => 'persisk-arabiska' ,
);
if ( @_ ) {
return $scripts { $_ [0]};
}
return \ %scripts ;
}
}
);
has 'display_name_key' => (
is => 'ro' ,
isa => HashRef[Str],
init_arg => undef ,
default => sub {
{
'timezone' => 'tidszon' ,
}
},
);
has 'display_name_type' => (
is => 'ro' ,
isa => HashRef[HashRef[Str]],
init_arg => undef ,
default => sub {
{
'collation' => {
'big5han' => q{kinesiska i big5-sorteringsordning} ,
'gb2312han' => q{kinesiska i gb2312-sorteringsordning} ,
'pinyin' => q{kinesiska i pinyin-sorteringsordning} ,
'stroke' => q{kinesiska i strecksorteringsordning} ,
},
}
},
);
has 'units' => (
is => 'ro' ,
isa => HashRef[HashRef[HashRef[Str]]],
init_arg => undef ,
default => sub { {
'narrow' => {
'speed-kilometer-per-hour' => {
'one' => q({0} km/h) ,
'other' => q({0} km/h) ,
},
'kilometer-per-hour' => {
'one' => q({0} km/h) ,
'other' => q({0} km/h) ,
},
},
} }
);
has 'number_symbols' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'latn' => {
'timeSeparator' => q(.) ,
},
} }
);
has 'calendar_quarters' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
'format' => {
abbreviated => { 0 => 'Q1' ,
1 => 'Q2' ,
2 => 'Q3' ,
3 => 'Q4'
},
},
'stand-alone' => {
abbreviated => { 0 => 'Q1' ,
1 => 'Q2' ,
2 => 'Q3' ,
3 => 'Q4'
},
},
},
} },
);
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 'gregorian' ) {
if ( $day_period_type eq 'default' ) {
return 'midnight' if $time == 0;
return 'afternoon1' if $time >= 1200
&& $time < 1800;
return 'evening1' if $time >= 1800
&& $time < 2400;
return 'morning1' if $time >= 500
&& $time < 1000;
return 'morning2' if $time >= 1000
&& $time < 1200;
return 'night1' if $time >= 0
&& $time < 500;
}
if ( $day_period_type eq 'selection' ) {
return 'afternoon1' if $time >= 1200
&& $time < 1800;
return 'evening1' if $time >= 1800
&& $time < 2400;
return 'morning1' if $time >= 500
&& $time < 1000;
return 'morning2' if $time >= 1000
&& $time < 1200;
return 'night1' if $time >= 0
&& $time < 500;
}
last SWITCH;
}
}
} },
);
around day_period_data => sub {
my ( $orig , $self ) = @_ ;
return $self -> $orig ;
};
has 'eras' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
},
} },
);
has 'date_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
},
} },
);
has 'time_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
},
} },
);
has 'datetime_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
},
} },
);
has 'datetime_formats_available_formats' => (
is => 'ro' ,
isa => HashRef,
init_arg => undef ,
default => sub { {
'gregorian' => {
Bhm => q{h.mm B} ,
Bhms => q{h.mm.ss B} ,
EBhm => q{E h.mm B} ,
EBhms => q{E h.mm.ss B} ,
EHm => q{E HH.mm} ,
EHms => q{E HH.mm.ss} ,
Ehm => q{E h.mm a} ,
Ehms => q{E h.mm.ss a} ,
Hm => q{HH.mm} ,
Hms => q{HH.mm.ss} ,
Hmsv => q{HH.mm.ss v} ,
Hmv => q{HH.mm v} ,
MEd => q{E d.M} ,
MMd => q{d.M} ,
MMdd => q{dd.MM} ,
Md => q{d.M} ,
hm => q{h.mm a} ,
hms => q{h.mm.ss a} ,
hmsv => q{h.mm.ss a v} ,
hmv => q{h.mm a v} ,
ms => q{mm.ss} ,
},
} },
);
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 { {
} },
);
no Moo;
1;
|