Re: do-until: Can't "next" outside a loop block.

[marquezc329]

instead of do why not try something like:

untested

while ($key ne "q") {
    $index_cur = int( rand($last_abc_letter) );
    unless ($index_cur == $index_prev) {
        $index_prev = $index_cur;
        print "$letter[$index_cur]\n";
        $key = ReadKey(0);
    }
}

I suggest reading perlintro if you haven't already. Also, if you're not already...

use strict;
use warnings;