fix(parser): allow new Foo IDENT => ... indirect-object form

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 = "3e7654d5a";
+    public static final String gitCommitId = "69964ee2f";
 
     /**
      * Git commit date of the build (ISO format: YYYY-MM-DD).
@@ -48,7 +48,7 @@ public final class Configuration {
      * Parsed by App::perlbrew and other tools via: perl -V | grep "Compiled at"
      * DO NOT EDIT MANUALLY - this value is replaced at build time.
      */
-    public static final String buildTimestamp = "Apr 27 2026 21:36:05";
+    public static final String buildTimestamp = "Apr 27 2026 22:11:34";
 
     // Prevent instantiation
     private Configuration() {

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

@@ -265,7 +265,12 @@ && isValidIndirectMethod(subName, parser)
                     // pair is the real indirect-object call. So reject the outer form.
                     // Example: `myfunc new Foo (4,5)` should parse as `myfunc(Foo->new(4,5))`,
                     // NOT as `new->myfunc(Foo(4,5))`.
-                    || (isPackage == null && !isKnownSub && token.type == LexerTokenType.IDENTIFIER)) {
+                    // Only reject when the outer `subName` is itself a known sub — otherwise we'd
+                    // wrongly reject the legitimate top-level case
+                    // `new HTTP::Request GET => $url` where `subName=new` is not declared and
+                    // `packageName=HTTP::Request` followed by IDENTIFIER `GET` is just the
+                    // method's first list-arg.
+                    || (subExists && isPackage == null && !isKnownSub && token.type == LexerTokenType.IDENTIFIER)) {
                 parser.tokenIndex = currentIndex2;
             } else {
                 // Not a known subroutine, check if it's valid indirect object syntax