Remove DESTROY support (moved to separate PR)

DESTROY for blessed objects will be handled in a dedicated branch
(feature/destroy-blessed-objects) where it can be developed with
proper reference counting before merging.

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/backend/jvm/EmitStatement.java

@@ -41,7 +41,7 @@ public class EmitStatement {
     static void emitScopeExitNullStores(EmitterContext ctx, int scopeIndex, boolean closeIO) {
         if (closeIO) {
             // For scalar variables in loop bodies, call cleanup to close IO
-            // on anonymous globs and fire DESTROY on blessed objects.
+            // on anonymous globs (deterministic DESTROY for lexical file handles).
             java.util.List<Integer> scalarIndices = ctx.symbolTable.getMyScalarIndicesInScope(scopeIndex);
             for (int idx : scalarIndices) {
                 ctx.mv.visitVarInsn(Opcodes.ALOAD, idx);
@@ -60,7 +60,7 @@ static void emitScopeExitNullStores(EmitterContext ctx, int scopeIndex, boolean
         }
     }
 
-    /** Convenience overload: null stores only, no IO/DESTROY cleanup (safe for all contexts). */
+    /** Convenience overload: null stores only, no IO cleanup (safe for all contexts). */
     static void emitScopeExitNullStores(EmitterContext ctx, int scopeIndex) {
         emitScopeExitNullStores(ctx, scopeIndex, false);
     }

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

@@ -33,14 +33,14 @@ 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 = "4c7ab0412";
+    public static final String gitCommitId = "5dc1e64a3";
 
     /**
      * Git commit date of the build (ISO format: YYYY-MM-DD).
      * Automatically populated by Gradle/Maven during build.
      * DO NOT EDIT MANUALLY - this value is replaced at build time.
      */
-    public static final String gitCommitDate = "2026-04-06";
+    public static final String gitCommitDate = "2026-04-07";
 
     // Prevent instantiation
     private Configuration() {

src/main/java/org/perlonjava/runtime/runtimetypes/RuntimeBase.java

@@ -13,10 +13,6 @@ public abstract class RuntimeBase implements DynamicState, Iterable<RuntimeScala
     // Index to the class that this reference belongs
     public int blessId;
 
-    // Guard flag to prevent calling DESTROY more than once on the same object.
-    // Set to true after DESTROY has been called (or is being called).
-    public boolean destroyCalled;
-
     /**
      * Adds this entity to the specified RuntimeList.
      *

src/main/java/org/perlonjava/runtime/runtimetypes/RuntimeHash.java

@@ -413,11 +413,6 @@ public RuntimeScalar delete(RuntimeScalar key) {
                 var value = elements.remove(k);
                 if (byteKeys != null) byteKeys.remove(k);
                 if (value != null) {
-                    // Call DESTROY on blessed references being removed from a hash.
-                    // In Perl, delete() on the last reference triggers DESTROY.
-                    // Without ref counting, we call it eagerly; the destroyCalled
-                    // flag on RuntimeBase prevents double-DESTROY.
-                    RuntimeScalar.callDestroyIfNeeded(value);
                     yield new RuntimeScalar(value);
                 }
                 yield new RuntimeScalar();
@@ -437,7 +432,6 @@ public RuntimeScalar delete(String key) {
                 var value = elements.remove(key);
                 if (byteKeys != null) byteKeys.remove(key);
                 if (value != null) {
-                    RuntimeScalar.callDestroyIfNeeded(value);
                     yield new RuntimeScalar(value);
                 }
                 yield new RuntimeScalar();

src/main/java/org/perlonjava/runtime/runtimetypes/RuntimeScalar.java

@@ -1746,9 +1746,6 @@ public RuntimeScalar undefine() {
             InheritanceResolver.invalidateCache();
             return this;
         }
-        // Call DESTROY on blessed references before clearing.
-        // undef $obj explicitly discards the reference, so DESTROY should fire.
-        callDestroyIfNeeded(this);
         // Close IO handles when dropping a glob reference.
         // This mimics Perl's internal sv_clear behavior where IO handles are closed
         // when the glob's reference count drops to zero (independent of DESTROY).
@@ -1843,55 +1840,6 @@ public static void scopeExitCleanup(RuntimeScalar scalar) {
                 }
             }
         }
-        // Also handle blessed references with DESTROY methods.
-        // When a lexical variable holding a blessed reference goes out of scope,
-        // call DESTROY on the object. This is an approximation of Perl's
-        // reference-counted DESTROY: without ref counting, we may call DESTROY
-        // early if other references exist. The destroyCalled flag prevents
-        // double-DESTROY.
-        callDestroyIfNeeded(scalar);
-    }
-
-    /**
-     * Calls DESTROY on a blessed object if:
-     * 1. The scalar holds a blessed reference (blessId != 0)
-     * 2. DESTROY hasn't been called yet on this object (destroyCalled flag)
-     * 3. The class hierarchy defines a DESTROY method
-     * <p>
-     * Perl semantics: DESTROY exceptions are caught and warned "(in cleanup)".
-     * DESTROY is called with the blessed reference as $_[0].
-     * <p>
-     * Note: Without reference counting, this may call DESTROY while other
-     * references to the object still exist. The destroyCalled flag on
-     * RuntimeBase prevents double-DESTROY.
-     */
-    public static void callDestroyIfNeeded(RuntimeScalar scalar) {
-        if (scalar == null) return;
-        int blessId = RuntimeScalarType.blessedId(scalar);
-        if (blessId == 0) return;
-        RuntimeBase base = (RuntimeBase) scalar.value;
-        if (base.destroyCalled) return;
-        base.destroyCalled = true;
-
-        String className = NameNormalizer.getBlessStr(blessId);
-        RuntimeScalar destroyMethod = InheritanceResolver.findMethodInHierarchy(
-                "DESTROY", className, null, 0);
-        if (destroyMethod == null || destroyMethod.type != CODE) {
-            base.destroyCalled = false;  // No DESTROY found, allow future attempts
-            return;
-        }
-
-        try {
-            // Call DESTROY($self) in void context
-            RuntimeArray args = new RuntimeArray();
-            args.push(scalar);
-            RuntimeCode.apply(destroyMethod, args, RuntimeContextType.VOID);
-        } catch (Exception e) {
-            // Perl: DESTROY exceptions are turned into warnings
-            String msg = e.getMessage();
-            if (msg == null) msg = e.getClass().getName();
-            Warnings.warn(new RuntimeArray(new RuntimeScalar("(in cleanup) " + msg + "\n")), RuntimeContextType.VOID);
-        }
     }
 
     public RuntimeScalar defined() {