open my $wordhandle, "<:crlf", $wordfile or die ...