MooseX::Types::Locale::Language is a Perl module that packages several Moose::Util::TypeConstraints with coercions, designed to work with the values of Locale::Language.
SYNOPSIS
{
package Foo;
use Moose;
use MooseX::Types::Locale::Language qw(
LanguageCode
LanguageName
);
has 'code'
=> ( isa => LanguageCode, is => 'rw', coerce => 1 );
has 'name'
=> ( isa => LanguageName, is => 'rw', coerce => 1 );
__PACKAGE__->meta->make_immutable;
}
my $foo = Foo->new(
code => 'JA',
name => 'JAPANESE',
);
print $foo->code; # 'ja'
print $foo->name; # 'Japanese'
Product's homepage
Requirements:
· Perl