Use builtin::weaken() in t/

[perl5.git] / t / re / qr-72922.t

diff --git a/t/re/qr-72922.t b/t/re/qr-72922.t
index 5f41ae3..279aba8 100644 (file)
--- a/t/re/qr-72922.t
+++ b/t/re/qr-72922.t
@@ -4,16 +4,16 @@ use strict;
 BEGIN {
     chdir 't' if -d 't';
     require './test.pl';
-    skip_all_if_miniperl("no dynamic loading on miniperl, no Scalar::Util");
 }
 
+use builtin 'weaken';
+
 plan(tests => 14);
 
 # [perl 72922]: A 'copy' of a Regex object which has magic should not crash
 # When a Regex object was copied and the copy weaken then the original regex object
 # could no longer be 'copied' with qr//
 
-use Scalar::Util 'weaken';
 sub s1 {
     my $re = qr/abcdef/;
     my $re_copy1 = $re;