Hi, On Wed, Apr 4, 2012 at 10:52 AM, sawyer x <[email protected]> wrote:
> There is actually an Enum type for Moose already: > Moose::Meta::TypeConstraint::Enum[1] > (I'm thinking of writing emails in Spinx form.. curse you Meir!) > > You mean reStructuredText, anyway: muwhahaha ;-) > To use it, you simple write, from the documentation: > use Moose::Util::TypeConstraints; > enum 'RGBColors', [ qw(red green blue) ]; > > I would personally write it as such: > enum RBGColors => [ qw/red green blue/ ]; > > I think it's more readable. :) > > The enum type constraint is documented here: > https://metacpan.org/module/Moose::Util::TypeConstraints > > > [1] https://metacpan.org/module/Moose::Meta::TypeConstraint::Enum > > > > > On Wed, Apr 4, 2012 at 9:08 AM, Dov Levenglick > <[email protected]>wrote: > >> I believe (after trying) that this won't work. Either I tried this >> wrong, or else Perl is looking for some module called MyEnum.pm >> >> >> Best Regards, >> Dov Levenglick >> >> >> >> On Wed, Apr 4, 2012 at 09:40, Shmuel Fomberg <[email protected]> >> wrote: >> > My experience with Moose is nil, but how about something like that: >> > >> > my %enum = ( A => 0, B => 1, C => 2); >> > >> > subtype 'MyEnum', >> > as 'Str', >> > where { exists $enum{$_} }, >> > message { "Wrong Enum name: $_" }; >> > >> > And then: >> > coerce 'MyEnum', >> > from 'Int', >> > via { $enum{$_} }; >> > >> > Shmuel. >> > >> > On Wed, Apr 4, 2012 at 3:27 PM, Dov Levenglick < >> [email protected]> >> > wrote: >> >> >> >> Hi, >> >> I want to declare a 3 value'd enum equivalent - i.e. (mixing C and >> perl): >> >> >> >> package My::Enum >> >> use Moose; >> >> >> >> typedef enum {A, B, C} enum_t; // knowledge in C - how do I >> >> port this concept to Perl? >> >> has 'b' => (isa => 'enum_t', is => 'rw'); >> >> >> >> 1; >> >> >> >> >> >> How would one go about doing that >> >> >> >> >> >> Best Regards, >> >> Dov Levenglick >> >> _______________________________________________ >> >> Perl mailing list >> >> [email protected] >> >> http://mail.perl.org.il/mailman/listinfo/perl >> > >> > >> > >> > _______________________________________________ >> > Perl mailing list >> > [email protected] >> > http://mail.perl.org.il/mailman/listinfo/perl >> _______________________________________________ >> Perl mailing list >> [email protected] >> http://mail.perl.org.il/mailman/listinfo/perl >> > > > _______________________________________________ > Perl mailing list > [email protected] > http://mail.perl.org.il/mailman/listinfo/perl > -- Meir Kriheli http://meirkriheli.com
_______________________________________________ Perl mailing list [email protected] http://mail.perl.org.il/mailman/listinfo/perl
