summaryrefslogtreecommitdiffstats
path: root/lib/Games/Word.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Games/Word.pm')
-rw-r--r--lib/Games/Word.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Games/Word.pm b/lib/Games/Word.pm
index ac7932e..88d3d56 100644
--- a/lib/Games/Word.pm
+++ b/lib/Games/Word.pm
@@ -21,9 +21,9 @@ sub random_word {
open my $fh, '<', $word_list or die "Opening $word_list failed";
while (<$fh>) {
- chomp;
$word = $_ if int(rand($.)) == 0;
}
+ chomp $word;
return $word;
}