From e3291e2227da1e80397b86a77d5c8855634685f1 Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Sat, 12 Oct 2024 19:34:54 +0200 Subject: [PATCH] replace smartmatch by match::smart (RT #156063) --- lib/Perinci/Import.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lib/Perinci/Import.pm b/lib/Perinci/Import.pm index 0325ed7..74e4e1d 100644 --- a/lib/Perinci/Import.pm +++ b/lib/Perinci/Import.pm @@ -3,7 +3,7 @@ package Perinci::Import; use 5.010001; use strict; use warnings; -use experimental 'smartmatch'; +use match::smart; our $VERSION = '0.03'; # VERSION @@ -19,7 +19,6 @@ sub import { my %exports; my $metas = do { no warnings; no strict 'refs'; \%{"$mod\::SPEC"} }; - use experimental 'smartmatch'; $metas //= {}; for my $k (keys %$metas) { @@ -54,7 +53,7 @@ sub import { for my $imp (@imps) { my @syms; # symbols from imported module if ($imp->{-sym} =~ s/^://) { - @syms = grep {$imp->{-sym} ~~ $exports{$_}{tags}} keys %exports; + @syms = grep {$imp->{-sym} |M| $exports{$_}{tags}} keys %exports; } else { @syms = ($imp->{-sym}); } -- 2.11.0