From f83f52be3bd9d5e2de28490dc35e4143ea54c01e Mon Sep 17 00:00:00 2001 From: jluehrs2 Date: Thu, 31 Jan 2008 15:51:54 -0500 Subject: better error for unable to open file --- lib/Games/Word.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lib/Games/Word.pm') 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; -- cgit v1.2.3-54-g00ecf