From 989e1f35e881da8458d84674f57026507337d222 Mon Sep 17 00:00:00 2001
From: Dan Fandrich <dan@coneharvesters.com>
Date: Thu, 14 Sep 2023 16:23:08 -0700
Subject: [PATCH] runtests: eliminate a warning on old perl versions

The warning "Use of implicit split to @_ is deprecated" showed between
perl versions about 5.8 through 5.11.
---
 tests/runner.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tests/runner.pm b/tests/runner.pm
index 8d86bd7714..8b61eb4b3b 100644
--- a/tests/runner.pm
+++ b/tests/runner.pm
@@ -753,7 +753,8 @@ sub singletest_prepare {
             my $path = $filename;
             # cut off the file name part
             $path =~ s/^(.*)\/[^\/]*/$1/;
-            my $nparts = scalar(split(/\//, $LOGDIR));
+            my @ldparts = split(/\//, $LOGDIR);
+            my $nparts = @ldparts;
             my @parts = split(/\//, $path);
             if(join("/", @parts[0..$nparts-1]) eq $LOGDIR) {
                 # the file is in $LOGDIR/