From 883a6416da6e4c29232010371548d46c1b0ea534 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sat, 5 Oct 2024 13:07:30 -0700
Subject: [PATCH] fix for git #165

---
 lib/Perl/Tidy/Tokenizer.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index c908f7fa..771bbe56 100644
--- a/lib/Perl/Tidy/Tokenizer.pm
+++ b/lib/Perl/Tidy/Tokenizer.pm
@@ -4880,9 +4880,11 @@ EOM
             # Bareword followed by a fat comma - see 'git18.in'
             # This code was previously sub do_QUOTED_BAREWORD: see c316, c317
 
+            # Older perl:
             #   'v25=>1'   is a v-string key!
             #   '-v25=>1'  is also a v-string key!
-            if ( $tok =~ /^v\d+$/ ) {
+            # Deactivated: this is no longer true; see git #165
+            if ( 0 && $tok =~ /^v\d+$/ ) {
                 $type = 'v';
                 $self->complain("v-string used as hash key\n");
                 $self->report_v_string($tok);
-- 
2.39.5