From f523fa253fb27bc4813c92a56ef8aebdda0dc659 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 8 Feb 2024 17:05:55 -0800
Subject: [PATCH] add comment

---
 lib/Perl/Tidy/Formatter.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index f9031d5d..42d3f20e 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -10264,6 +10264,11 @@ sub interbracket_arrow_check {
     #   my $v2 = [ 1, 2, [ 3, 4 ] ]->[2][0];      # ok, keep required arrow
     #   my $v3 = [ 1, 2, [ 3, 4 ] ][2][0];        # Error
 
+    #   Note that an arrow does not get placed between '}' and '[' here:
+    #     my $val = ${$x}[1];
+    #   Perltidy marks the '$' as type 't', and since the logic below checks
+    #   for identifiers of type 'i', it will work ok.
+
     # We will maintain the flag for this check in the following hash:
     my %trailing_arrow_ok_by_seqno;
 
-- 
2.39.5