Remove TestMoreHelper workaround - use native last SKIP

Now that the control flow fix is merged (PR #121), we can remove the
TestMoreHelper workaround that was transforming skip() calls at parse time.

Changes:
- Removed TestMoreHelper.java
- Removed TestMoreHelper calls from StatementParser and StatementResolver
- Updated Test::More.pm skip() to use 'last SKIP' directly
- Removed skip_internal() from Test::More.pm exports
- Cleaned up test.pl.patch to remove skip_internal workaround

Results:
- skip_control_flow.t: all 3 tests pass ✓
- Baseline maintained: 66683/66880 ✓

Author: fglock

dev/import-perl5/config.yaml

@@ -62,10 +62,6 @@ imports:
     type: directory
 
   # Specific patched files (applied after directory import above)
-  - source: perl5/t/test.pl
-    target: perl5_t/t/test.pl
-    patch: test.pl.patch
-
   - source: perl5/t/re/pat.t
     target: perl5_t/t/re/pat.t
     patch: pat.t.patch

dev/import-perl5/patches/test.pl.patch

@@ -287,6 +287,7 @@ static void handleApplyOperator(EmitterVisitor emitterVisitor, BinaryOperatorNod
             codeRefSlot = emitterVisitor.ctx.symbolTable.allocateLocalVariable();
         }
         mv.visitVarInsn(Opcodes.ASTORE, codeRefSlot);
+        emitterVisitor.ctx.javaClassInfo.decrementStackLevel(1);
 
         int nameSlot = emitterVisitor.ctx.javaClassInfo.acquireSpillSlot();
         boolean pooledName = nameSlot >= 0;
@@ -326,6 +327,7 @@ static void handleApplyOperator(EmitterVisitor emitterVisitor, BinaryOperatorNod
 
             paramList.elements.get(index).accept(listVisitor);
             mv.visitVarInsn(Opcodes.ASTORE, argSlot);
+            emitterVisitor.ctx.javaClassInfo.decrementStackLevel(1);
 
             mv.visitVarInsn(Opcodes.ALOAD, argsArraySlot);
             if (index <= 5) {

src/main/java/org/perlonjava/codegen/EmitSubroutine.java

@@ -266,9 +266,6 @@ public static Node parseIfStatement(Parser parser) {
             elseBranch = parseIfStatement(parser);
         }
 
-        // Use a macro to emulate Test::More SKIP blocks
-        TestMoreHelper.handleSkipTest(parser, thenBranch);
-
         return new IfNode(operator.text, condition, thenBranch, elseBranch, parser.tokenIndex);
     }
 

src/main/java/org/perlonjava/parser/StatementParser.java

@@ -570,11 +570,6 @@ yield dieWarnNode(parser, "die", new ListNode(List.of(
 
                         parser.ctx.symbolTable.exitScope(scopeIndex);
 
-                        if (label != null && label.equals("SKIP")) {
-                            // Use a macro to emulate Test::More SKIP blocks
-                            TestMoreHelper.handleSkipTest(parser, block);
-                        }
-
                         yield new For3Node(label,
                                 true,
                                 null, null,

src/main/java/org/perlonjava/parser/StatementResolver.java

@@ -16,7 +16,6 @@ our @EXPORT = qw(
     pass fail diag note done_testing is_deeply subtest
     use_ok require_ok BAIL_OUT
     skip
-    skip_internal
     eq_array eq_hash eq_set
 );
 
@@ -286,21 +285,15 @@ sub BAIL_OUT {
     exit 255;
 }
 
-sub skip {
-    die "Test::More::skip() is not implemented";
-}
-
-# Workaround to avoid non-local goto (last SKIP).
-# The skip_internal subroutine is called from a macro in TestMoreHelper.java
-#
-sub skip_internal {
+sub skip($;$) {
     my ($name, $count) = @_;
+    $count ||= 1;
     for (1..$count) {
         $Test_Count++;
         my $result = "ok";
         print "$Test_Indent$result $Test_Count # skip $name\n";
     }
-    return 1;
+    last SKIP;
 }
 
 # Legacy comparison functions - simple implementations using is_deeply