$r = @r ; # Case 1 -- $r -> 26 $v = %r ; # Case 2 -- $r -> 19/32 $r = (@r) ; # Case 3 -- $r -> 26 $v = (%r) ; # Case 4 -- $r -> 19/32