note thmsdrew <p>It worked fine but yes there was an empty file named 1.</p> <p>If I change it to the following it should work as I meant it to:</p><code>open (my $fh, "<", $ARGV[0]) or die "Can't open input file!"; my @words; while (<>) { push(@words, $_); }</code> 988726 988734