diff --git a/src/main/java/org/perlonjava/parser/StringDoubleQuoted.java b/src/main/java/org/perlonjava/parser/StringDoubleQuoted.java index e10daea9..d7fbe4e4 100644 --- a/src/main/java/org/perlonjava/parser/StringDoubleQuoted.java +++ b/src/main/java/org/perlonjava/parser/StringDoubleQuoted.java @@ -357,6 +357,9 @@ protected void parseEscapeSequence() { applyCaseModifier(caseModifiers.pop()); } inQuotemeta = false; + } else if (token.text.startsWith("Q")) { + // In quotemeta mode, \Q is idempotent and should be ignored. + TokenUtils.consumeChar(parser); } else { // Everything else is literal, including the backslash currentSegment.append("\\");