use constant { X=>0, Y=>1, Z=>2};

##</code><code>##

$helix1{A}[X];