perldelta for fc39925ca

[perl5.git] / perly.y

diff --git a/perly.y b/perly.y
index 0261c26..b947a17 100644 (file)
--- a/perly.y
+++ b/perly.y
@@ -1491,6 +1491,10 @@ arylen   :       DOLSHARP indirob
                        { $$ = newAVREF($2);
                          TOKEN_GETMAD($1,$$,'l');
                        }
+       |       term ARROW DOLSHARP '*'
+                       { $$ = newAVREF($1);
+                         TOKEN_GETMAD($3,$$,'l');
+                       }
        ;
 
 star   :       '*' indirob