<div dir="ltr"><div>use Moose::Util::TypeConstraints;</div><div><br></div><div>enum &#39;RGBColors&#39;, [qw(red green blue)];</div><div><br></div>(FWIW this is the first hit on <a href="https://www.google.com/search?q=moose+enum" target="_blank">https://www.google.com/search?q=moose+enum</a> )<div>

<br></div><div><br><div class="gmail_quote">On Wed, Apr 4, 2012 at 9:27 AM, Dov Levenglick <span dir="ltr">&lt;<a href="mailto:dov.levenglick@gmail.com" target="_blank">dov.levenglick@gmail.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

Hi,<br>
I want to declare a 3 value&#39;d enum equivalent - i.e. (mixing C and perl):<br>
<br>
package My::Enum<br>
use Moose;<br>
<br>
typedef enum {A, B, C} enum_t;            // knowledge in C - how do I<br>
port this concept to Perl?<br>
has &#39;b&#39; =&gt; (isa =&gt; &#39;enum_t&#39;,  is =&gt; &#39;rw&#39;);<br>
<br>
1;<br>
<br>
<br>
How would one go about doing that<br>
<br>
<br>
Best Regards,<br>
<font color="#888888">Dov Levenglick<br>
_______________________________________________<br>
Perl mailing list<br>
<a href="mailto:Perl@perl.org.il" target="_blank">Perl@perl.org.il</a><br>
<a href="http://mail.perl.org.il/mailman/listinfo/perl" target="_blank">http://mail.perl.org.il/mailman/listinfo/perl</a><br>
</font></blockquote></div><br><br clear="all"><div><br></div>-- <br>Gaal Yahas &lt;<a href="mailto:gaal@forum2.org" target="_blank">gaal@forum2.org</a>&gt;<br><a href="http://gaal.livejournal.com/" target="_blank">http://gaal.livejournal.com/</a><br>

</div></div>