We'll need an array - @word_so_far - to hold the correct guesses.
sub word_so_far{ foreach $l (@letters) { $word_so_far[$i] = "_"; $i++; } }