Select Code to Download

my @array;
for ( 1 .. 10 ) {
...
    } while $array[$random_number] eq 'X';
    $array[$random_number] = 'X';
}