my $dict_file = '/usr/share/dict/words';
open my $dict_fh, '<', $dict_file
    or die "Can't read '$dict_file': $!";