# New Ticket Created by  Richard Hainsworth 
# Please include the string:  [perl #62342]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=62342 >


After playing with enums, I got the following:

perl6
 > enum day <<:Sun(1) Mon Tue Wed Thr Fri Sat>>; my $x does day; 
$x.pick; say $x
Use of uninitialized value
 > enum day <<:Sun(1) Mon Tue Wed Thr Fri Sat>>; my $x does day; $x = 
Tue; say $x
2
# If Sun -> 1, then Tue should be 3

perl6
 > enum roman [ i => 1, x => 10, v => 5]; my $x does roman = v; say $x
too few arguments passed (0) - 1 params expected
 > enum roman [ i => 1, x => 10, v => 5]; my $x does roman; $x = v; say $x
too few arguments passed (0) - 1 params expected
 > enum roman [ i => 1, x => 10, v => 5]; my $x does roman; $x='v'; say $x
v

assigning v to $x should yield 10 as a value

Summary, it seems that enum works so long as the underlying value is a 
list starting at 0
 

Reply via email to