my $displayed; foreach my $s (split(//, $word)) { if (exists($correct_guesses{$s})) { $displayed .= $s; } else { $displayed .= "*"; } $displayed .= " "; }