Select Code to Download

my @array = qw(A R N D);
# is equivalent to
...
$array[1] = 'R';
$array[2] = 'N';
$array[3] = 'D';

$array[0] = 'B';