1 files changed, 1 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index 331a71b920..af117bcf92 100644
--- a/toke.c
+++ b/toke.c
@@ -4209,7 +4209,7 @@ Perl_yylex(pTHX)
 	    if (*s == '{')
 		PRETERMBLOCK(DO);
 	    if (*s != '\'')
-		s = force_word(s,WORD,FALSE,TRUE,FALSE);
+		s = force_word(s,WORD,TRUE,TRUE,FALSE);
 	    OPERATOR(DO);
 
 	case KEY_die: