From 9c0da488af366307b7fc89417ba63d3aca36d0ba Mon Sep 17 00:00:00 2001
From: Tony Cook <tony@develop-help.com>
Date: Wed, 10 Jul 2024 15:01:10 +1000
Subject: [PATCH] need to run perl

---
 Porting/test-dist-modules.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Porting/test-dist-modules.pl b/Porting/test-dist-modules.pl
index f322f674ad2d..7d0017a77d48 100644
--- a/Porting/test-dist-modules.pl
+++ b/Porting/test-dist-modules.pl
@@ -215,7 +215,7 @@ sub test_dist {
         $failed = "Makefile.PL";
         die "$name: Makefile.PL failed\n" unless $continue;
     }
-    elsif (!run("prove", "-b", @verbose, '-e', 'gdb -q -ex r -ex bt -ex q --args')) {
+    elsif (!run("prove", "-b", @verbose, '-e', 'gdb -q -ex r -ex bt -ex q --args perl -Mblib')) {
         $failed = "make test";
         die "$name: make test failed\n" unless $continue;
     }