Use builtin::weaken() in t/

[perl5.git] / t / op / lvref.t

diff --git a/t/op/lvref.t b/t/op/lvref.t
index 3991a53..9553583 100644 (file)
--- a/t/op/lvref.t
+++ b/t/op/lvref.t
@@ -538,11 +538,9 @@ like $@,
   is s(3), 1, 'padstale alias should not reset state'
 }
 
-SKIP: {
-    skip_without_dynamic_extension('List/Util');
-    require Scalar::Util;
+{
     my $a;
-    Scalar::Util::weaken($r = \$a);
+    builtin::weaken($r = \$a);
     \$a = $r;
     pass 'no crash when assigning \$lex = $weakref_to_lex'
 }