From ff372f171b830672f9039fdc08f39f1907e5d243 Mon Sep 17 00:00:00 2001 From: James E Keenan Date: Tue, 20 Aug 2024 13:41:04 -0400 Subject: [PATCH] Smartmatch discontinued beginning perl-5.41.3 --- lib/Type/Tiny.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Type/Tiny.pm b/lib/Type/Tiny.pm index 2d073b8bd..acd1a899a 100644 --- a/lib/Type/Tiny.pm +++ b/lib/Type/Tiny.pm @@ -86,7 +86,7 @@ sub _croak ($;@) { require Error::TypeTiny; goto \&Error::TypeTiny::croak } sub _swap { $_[2] ? @_[ 1, 0 ] : @_[ 0, 1 ] } BEGIN { - my $support_smartmatch = 0+ !!( $] >= 5.010001 ); + my $support_smartmatch = 0+ !!( $] >= 5.010001 && $] <= 5.041002 ); eval qq{ sub SUPPORT_SMARTMATCH () { !! $support_smartmatch } }; my $fixed_precedence = 0+ !!( $] >= 5.014 );