Select Code to Download

use strict;
my $start_letter = 'A';
...
for (my $i=$start_letter; $i le $end_letter; $i++) {
  print "\$i = $i\n";
}