1use strict; 2use warnings; 3 4use Test::More tests => 2; 5 6use DateTime::Locale; 7 8my $locale = DateTime::Locale->load('en-US'); 9 10ok( $locale, 'loaded locale with dash in name' ); 11is( $locale->id, 'en_US', 'id is en_US' ); 12 13