use mkpath instead of make_path so that it works on perl 5.8 (Solaris 10)

diff --git a/tests/TESTrun b/tests/TESTrun
index 35773fa99ba8960f71f213a9398aaeb6334dc5ad..702ecbda4ef269fbdb2d4ecd2f58074f8b2b0782 100755 (executable)
--- a/tests/TESTrun
+++ b/tests/TESTrun
@@ -5,7 +5,7 @@ $TCPDUMP = "./tcpdump" if (!($TCPDUMP = $ENV{TCPDUMP_BIN}));
 use File::Basename;
 use POSIX qw( WEXITSTATUS WIFEXITED);
 use Cwd qw(abs_path getcwd);
-use File::Path qw(make_path remove_tree);
+use File::Path qw(mkpath);   # mkpath works with ancient perl, as well as newer perl
 
 eval 'use YAML qw(LoadFile); 1' || die "TESTrun needs YAML.pm. apt install libyaml-perl/yum install per-YAML/cpanm YAML";
 
@@ -13,8 +13,8 @@ eval 'use YAML qw(LoadFile); 1' || die "TESTrun needs YAML.pm. apt install libya
 # a build directory.
 my $newdir = "tests/NEW";
 my $diffdir= "tests/DIFF";
-make_path($newdir);
-make_path($diffdir);
+mkpath($newdir);
+mkpath($diffdir);
 my $origdir = getcwd();
 my $srcdir  = $ENV{'srcdir'} || ".";