open(FH, '<', "keyword.txt") || die "Error opening 'keyword.txt': $!\n";
                   ^^-- sic!     error message in here -----------^^