Select Code to Download

  my @original_array = qw/ 5 100 2 8 40 /;
  my @sequence;
...
  ] = 'A' .. 'Z';

  print "@sequence\n";

  B E A C D