fix: suppress spurious warnings in Text::CSV tests

1. ${q} ambiguity warning: suppress inside string interpolation
   (matching Perl 5, which only warns in code context)

2. Wide character in print: fix heredoc octet handling to convert
   Unicode chars back to UTF-8 bytes without use utf8, matching
   Perl 5 treatment of source bytes as Latin-1. Skips conversion
   for ISO-8859-1 source files (isByteStringSource).

Generated with [Devin](https://cli.devin.ai/docs)

Co-Authored-By: Devin <158243242+devin-ai-integration[bot]@users.noreply.github.com>

Author: fglock

src/main/java/org/perlonjava/core/Configuration.java

@@ -33,7 +33,7 @@ public final class Configuration {
      * Automatically populated by Gradle/Maven during build.
      * DO NOT EDIT MANUALLY - this value is replaced at build time.
      */
-    public static final String gitCommitId = "5d58cec3b";
+    public static final String gitCommitId = "4aafb6057";
 
     /**
      * Git commit date of the build (ISO format: YYYY-MM-DD).

src/main/java/org/perlonjava/frontend/parser/ParseHeredoc.java

@@ -10,10 +10,12 @@
 import org.perlonjava.frontend.lexer.LexerTokenType;
 import org.perlonjava.runtime.runtimetypes.PerlCompilerException;
 
+import java.nio.charset.StandardCharsets;
 import java.util.ArrayList;
 import java.util.List;
 
 import static org.perlonjava.frontend.parser.StringParser.parseRawString;
+import static org.perlonjava.runtime.perlmodule.Strict.HINT_UTF8;
 
 public class ParseHeredoc {
     static OperatorNode parseHeredoc(Parser parser, String tokenText) {
@@ -212,6 +214,16 @@ else if (currentIndex >= tokens.size() ||
             String string = content.toString();
             if (CompilerOptions.DEBUG_ENABLED) parser.ctx.logDebug("Final heredoc content: <<" + string + ">>");
 
+            // Without `use utf8`, convert Unicode chars back to UTF-8 byte values,
+            // matching Perl 5's treatment of source bytes as Latin-1/octets.
+            // Skip if source is already ISO-8859-1 (isByteStringSource) — chars already
+            // represent raw byte values and need no conversion.
+            if (!parser.ctx.symbolTable.isStrictOptionEnabled(HINT_UTF8)
+                    && !parser.ctx.compilerOptions.isUnicodeSource
+                    && !parser.ctx.compilerOptions.isByteStringSource) {
+                string = convertToOctets(string);
+            }
+
             // Rewrite the heredoc node, according to the delimiter
             Node operand = null;
             switch (delimiter) {
@@ -293,4 +305,19 @@ public static void restoreHeredocStateIfNeeded(Parser parser, List<OperatorNode>
             parser.getHeredocNodes().addAll(savedHeredocNodes);
         }
     }
+
+    /**
+     * Convert a Unicode string back to UTF-8 byte values.
+     * Without `use utf8`, Perl treats source bytes as Latin-1/octets.
+     * Since Java reads source files as UTF-8 and decodes multi-byte sequences
+     * into single characters, we need to reverse this for Perl compatibility.
+     */
+    private static String convertToOctets(String str) {
+        byte[] utf8Bytes = str.getBytes(StandardCharsets.UTF_8);
+        StringBuilder octetString = new StringBuilder(utf8Bytes.length);
+        for (byte b : utf8Bytes) {
+            octetString.append((char) (b & 0xFF));
+        }
+        return octetString.toString();
+    }
 }

src/main/java/org/perlonjava/frontend/parser/Variable.java

@@ -925,8 +925,9 @@ public static Node parseBracedVariable(Parser parser, String sigil, boolean isSt
                     if (TokenUtils.peek(parser).text.equals("}")) {
                         TokenUtils.consume(parser, LexerTokenType.OPERATOR, "}");
 
-                        // Issue ambiguity warning if needed
-                        if (isAmbiguous) {
+                        // Issue ambiguity warning if needed (not inside string interpolation,
+                        // matching Perl 5 which only warns in code context)
+                        if (isAmbiguous && !isStringInterpolation) {
                             String accessType = "";
                             if (operand instanceof BinaryOperatorNode binOp) {
                                 if (binOp.operator.equals("[")) {