1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 5f2f25e152..6642af7b22 100644
--- a/toke.c
+++ b/toke.c
@@ -5382,7 +5382,7 @@ Perl_yylex(pTHX)
 			break;
 		    }
 		}
-		sv = newSVpvn(s, len);
+		sv = newSVpvn_flags(s, len, UTF ? SVf_UTF8 : 0);
 		if (*d == '(') {
 		    d = scan_str(d,TRUE,TRUE);
 		    if (!d) {