The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more
1234567891011121314151617 use strict;use warnings;use utf8;use Test2::V0;use Test::File::ShareDir::Dist { 'DateTime-Locale' => 'share' };use DateTime::Locale;for my $code (qw( en EN en-us EN-US EN-us sHi-LatN-mA )) { ok( DateTime::Locale->load($code), "code $code loaded a locale" );}done_testing();
use
strict;
warnings;
utf8;
Test2::V0;
Test::File::ShareDir::Dist {
'DateTime-Locale'
=>
'share'
};
DateTime::Locale;
for
my
$code
(
qw( en EN en-us EN-US EN-us sHi-LatN-mA )
) {
ok(
DateTime::Locale->load(
),
"code $code loaded a locale"
);
}
done_testing();