Change < to le and it magically works:

my $start_letter = "A";
my $end_letter = "D";
for (my $i = $start_letter; $i le $end_letter; $i++) {
    print "\$i = $i\n";
}
[download]