The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use utf8;

use Test::More 0.96;

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();