diff options
Diffstat (limited to 'lib/Games/Word.pm')
-rw-r--r-- | lib/Games/Word.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Games/Word.pm b/lib/Games/Word.pm index 1abdcf0..ac7932e 100644 --- a/lib/Games/Word.pm +++ b/lib/Games/Word.pm @@ -19,8 +19,7 @@ sub set_word_list { sub random_word { my $word; - open my $fh, '<', $word_list - or die "Couldn't open word list: $word_list"; + open my $fh, '<', $word_list or die "Opening $word_list failed"; while (<$fh>) { chomp; $word = $_ if int(rand($.)) == 0; |