my @letters = (0 .. 9, 'a' .. 'z');
for my $i (0 .. 35) {