diff --git a/tests/appveyor.pm b/tests/appveyor.pm
index 9f3cd3193a..ed1728682c 100644
--- a/tests/appveyor.pm
+++ b/tests/appveyor.pm
@@ -26,7 +26,7 @@
 package appveyor;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/azure.pm b/tests/azure.pm
index e071c6a318..2810f48e17 100644
--- a/tests/azure.pm
+++ b/tests/azure.pm
@@ -26,7 +26,7 @@
 package azure;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/certs/genserv.pl b/tests/certs/genserv.pl
index 5a034fbada..42aba5370e 100755
--- a/tests/certs/genserv.pl
+++ b/tests/certs/genserv.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 use File::Basename;
 use File::Spec;
diff --git a/tests/configurehelp.pm.in b/tests/configurehelp.pm.in
index 851f878d16..626df2c511 100644
--- a/tests/configurehelp.pm.in
+++ b/tests/configurehelp.pm.in
@@ -25,7 +25,7 @@
 package configurehelp;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use Exporter;
 
 use vars qw(
diff --git a/tests/devtest.pl b/tests/devtest.pl
index 67b51f527a..168e00ec94 100755
--- a/tests/devtest.pl
+++ b/tests/devtest.pl
@@ -34,7 +34,7 @@
 #   curl -vkL https://localhost:<protoport>/11
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use 5.006;
 
 BEGIN {
diff --git a/tests/directories.pm b/tests/directories.pm
index dde83d4cd5..8b3c1addfa 100644
--- a/tests/directories.pm
+++ b/tests/directories.pm
@@ -25,7 +25,7 @@
 package directories;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 8dd59b51b3..927d4c66a3 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -41,7 +41,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
diff --git a/tests/getpart.pm b/tests/getpart.pm
index 52a757f9b6..3f9ecbb5af 100644
--- a/tests/getpart.pm
+++ b/tests/getpart.pm
@@ -25,7 +25,7 @@
 package getpart;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/globalconfig.pm b/tests/globalconfig.pm
index 927bcd0099..83c4ccbaed 100644
--- a/tests/globalconfig.pm
+++ b/tests/globalconfig.pm
@@ -28,7 +28,7 @@
 package globalconfig;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/http-server.pl b/tests/http-server.pl
index 071f652662..d100caef68 100755
--- a/tests/http-server.pl
+++ b/tests/http-server.pl
@@ -24,7 +24,7 @@
 #***************************************************************************
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
diff --git a/tests/http2-server.pl b/tests/http2-server.pl
index 553f1e922d..1a36a8b1f6 100755
--- a/tests/http2-server.pl
+++ b/tests/http2-server.pl
@@ -24,7 +24,7 @@
 #***************************************************************************
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # This script invokes nghttpx properly to have it serve HTTP/2 for us.
 # nghttpx runs as a proxy in front of our "actual" HTTP/1 server.
diff --git a/tests/http3-server.pl b/tests/http3-server.pl
index 611d07a88c..6b3de3d748 100755
--- a/tests/http3-server.pl
+++ b/tests/http3-server.pl
@@ -24,7 +24,7 @@
 #***************************************************************************
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # This script invokes nghttpx properly to have it serve HTTP/3 for us.
 # nghttpx runs as a proxy in front of our "actual" HTTP/1 server.
diff --git a/tests/memanalyze.pl b/tests/memanalyze.pl
index d65ef39afe..e794972a33 100755
--- a/tests/memanalyze.pl
+++ b/tests/memanalyze.pl
@@ -30,7 +30,7 @@
 # MEM sendf.c:232 free(f6520)
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $mallocs=0;
 my $callocs=0;
diff --git a/tests/pathhelp.pm b/tests/pathhelp.pm
index 82fee0f8eb..1695825188 100644
--- a/tests/pathhelp.pm
+++ b/tests/pathhelp.pm
@@ -50,7 +50,7 @@
 package pathhelp;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use File::Spec;
 
 BEGIN {
diff --git a/tests/processhelp.pm b/tests/processhelp.pm
index 1d0e42ba1d..571ed5b34d 100644
--- a/tests/processhelp.pm
+++ b/tests/processhelp.pm
@@ -25,7 +25,7 @@
 package processhelp;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/rtspserver.pl b/tests/rtspserver.pl
index af53cb1ed3..d2e1339073 100755
--- a/tests/rtspserver.pl
+++ b/tests/rtspserver.pl
@@ -24,7 +24,7 @@
 #***************************************************************************
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
diff --git a/tests/runner.pm b/tests/runner.pm
index 36b6180515..a208eba3a2 100644
--- a/tests/runner.pm
+++ b/tests/runner.pm
@@ -35,7 +35,7 @@
 package runner;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use 5.006;
 
 use File::Basename;
diff --git a/tests/runtests.pl b/tests/runtests.pl
index 4c8a8d7839..dfa35aaea5 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -57,7 +57,7 @@
 # given, this won't be a problem.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use 5.006;
 use POSIX qw(strftime);
 
diff --git a/tests/secureserver.pl b/tests/secureserver.pl
index 13f4801084..930845e971 100755
--- a/tests/secureserver.pl
+++ b/tests/secureserver.pl
@@ -28,7 +28,7 @@
 # non-secure test harness servers.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
diff --git a/tests/serverhelp.pm b/tests/serverhelp.pm
index 0f8418b950..fd762935a2 100644
--- a/tests/serverhelp.pm
+++ b/tests/serverhelp.pm
@@ -27,7 +27,7 @@
 package serverhelp;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/servers.pm b/tests/servers.pm
index 73af43f66c..df32ca7e4e 100644
--- a/tests/servers.pm
+++ b/tests/servers.pm
@@ -31,7 +31,7 @@ package servers;
 use IO::Socket;
 use Time::HiRes;
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/sshhelp.pm b/tests/sshhelp.pm
index b73762fe4b..72a81611e4 100644
--- a/tests/sshhelp.pm
+++ b/tests/sshhelp.pm
@@ -25,7 +25,7 @@
 package sshhelp;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/sshserver.pl b/tests/sshserver.pl
index dd0d87a7fb..98c15bc2a9 100755
--- a/tests/sshserver.pl
+++ b/tests/sshserver.pl
@@ -27,7 +27,7 @@
 # Also creates the ssh configuration files needed for these tests.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use Cwd;
 use Cwd 'abs_path';
 use Digest::MD5;
diff --git a/tests/test1119.pl b/tests/test1119.pl
index 00eaf16ba7..d1cdf4e11c 100755
--- a/tests/test1119.pl
+++ b/tests/test1119.pl
@@ -28,7 +28,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use vars qw($Cpreprocessor);
 
 #
diff --git a/tests/test1132.pl b/tests/test1132.pl
index 0765957f2b..e808c2e8c8 100755
--- a/tests/test1132.pl
+++ b/tests/test1132.pl
@@ -31,7 +31,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $dir = $ARGV[0] || die "specify directory!";
 
diff --git a/tests/test1135.pl b/tests/test1135.pl
index 938698fdcf..b64e4bf8a8 100755
--- a/tests/test1135.pl
+++ b/tests/test1135.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $sort = 0;
 
diff --git a/tests/test1139.pl b/tests/test1139.pl
index 78a8bb0de0..cabb893d69 100755
--- a/tests/test1139.pl
+++ b/tests/test1139.pl
@@ -39,7 +39,7 @@
 # Output all deviances to stderr.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # we may get the dir roots pointed out
 my $root=$ARGV[0] || ".";
diff --git a/tests/test1140.pl b/tests/test1140.pl
index 6a85a1d4c3..8900ef439f 100755
--- a/tests/test1140.pl
+++ b/tests/test1140.pl
@@ -27,7 +27,7 @@
 # codes or references to non-existing curl manpages.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $docsroot = $ARGV[0] || '.';
 
diff --git a/tests/test1165.pl b/tests/test1165.pl
index 97830ce82f..a15071c256 100755
--- a/tests/test1165.pl
+++ b/tests/test1165.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # the DISABLE options that can be set by configure
 my %disable;
diff --git a/tests/test1167.pl b/tests/test1167.pl
index cc0d6d7069..e2965b784a 100755
--- a/tests/test1167.pl
+++ b/tests/test1167.pl
@@ -28,7 +28,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use vars qw($Cpreprocessor);
 
 #
diff --git a/tests/test1173.pl b/tests/test1173.pl
index 0f4fc5c492..9b384ded78 100755
--- a/tests/test1173.pl
+++ b/tests/test1173.pl
@@ -28,7 +28,7 @@
 # Output all deviances to stderr.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use File::Basename;
 
 # get the file name first
diff --git a/tests/test1175.pl b/tests/test1175.pl
index 65c2e54db6..2e67142613 100755
--- a/tests/test1175.pl
+++ b/tests/test1175.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # we may get the dir root pointed out
 my $root = $ARGV[0] || ".";
diff --git a/tests/test1177.pl b/tests/test1177.pl
index 564f32c032..83c3ee8ba5 100755
--- a/tests/test1177.pl
+++ b/tests/test1177.pl
@@ -28,7 +28,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $manpage=$ARGV[0];
 my $header=$ARGV[1];
diff --git a/tests/test1222.pl b/tests/test1222.pl
index dcbb6dd7be..0d9d6fdd32 100755
--- a/tests/test1222.pl
+++ b/tests/test1222.pl
@@ -28,7 +28,7 @@
 # files, manpages and symbols-in-versions are in sync.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 use File::Basename;
 
diff --git a/tests/test1275.pl b/tests/test1275.pl
index d9df8cec9c..d9429ea3dc 100755
--- a/tests/test1275.pl
+++ b/tests/test1275.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $root=$ARGV[0] || "..";
 
diff --git a/tests/test1276.pl b/tests/test1276.pl
index df3ad9aeba..3eb04c035f 100755
--- a/tests/test1276.pl
+++ b/tests/test1276.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 sub showline {
     my ($l) = @_;
diff --git a/tests/test1477.pl b/tests/test1477.pl
index 4faa02db6d..8d3e1deca5 100755
--- a/tests/test1477.pl
+++ b/tests/test1477.pl
@@ -27,7 +27,7 @@
 # error codes.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # we may get the dir roots pointed out
 my $root=$ARGV[0] || ".";
diff --git a/tests/test1486.pl b/tests/test1486.pl
index e845f53bf4..4ff55c3b12 100755
--- a/tests/test1486.pl
+++ b/tests/test1486.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # we may get the dir root pointed out
 my $root=$ARGV[0] || ".";
diff --git a/tests/test1488.pl b/tests/test1488.pl
index 6f555f9bb5..1994f93bee 100755
--- a/tests/test1488.pl
+++ b/tests/test1488.pl
@@ -28,7 +28,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 use vars qw($Cpreprocessor);
 use allversions;
 
diff --git a/tests/test1544.pl b/tests/test1544.pl
index c251483847..beb088d5b8 100755
--- a/tests/test1544.pl
+++ b/tests/test1544.pl
@@ -28,7 +28,7 @@
 # string options.
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $root=$ARGV[0] || ".";
 my $incdir = "$root/include/curl";
diff --git a/tests/test1707.pl b/tests/test1707.pl
index 3334fc56ef..249d2914f1 100755
--- a/tests/test1707.pl
+++ b/tests/test1707.pl
@@ -28,7 +28,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 my $curl = shift @ARGV;
 my $opt = shift @ARGV;
diff --git a/tests/test745.pl b/tests/test745.pl
index 5f3fa3bf1b..02ed3be5c3 100755
--- a/tests/test745.pl
+++ b/tests/test745.pl
@@ -24,7 +24,7 @@
 ###########################################################################
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 # we may get the dir root pointed out
 my $root=$ARGV[0] || ".";
diff --git a/tests/test971.pl b/tests/test971.pl
index 16727d2b97..b7046ac678 100755
--- a/tests/test971.pl
+++ b/tests/test971.pl
@@ -30,7 +30,7 @@
 #
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 use allversions;
 
diff --git a/tests/testutil.pm b/tests/testutil.pm
index 63267f1738..d1cf0c6b34 100644
--- a/tests/testutil.pm
+++ b/tests/testutil.pm
@@ -28,7 +28,7 @@
 package testutil;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);
diff --git a/tests/tftpserver.pl b/tests/tftpserver.pl
index b21adfc1ed..862d21cd13 100755
--- a/tests/tftpserver.pl
+++ b/tests/tftpserver.pl
@@ -24,7 +24,7 @@
 #***************************************************************************
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     push(@INC, $ENV{'srcdir'}) if(defined $ENV{'srcdir'});
diff --git a/tests/valgrind.pm b/tests/valgrind.pm
index 5a559053bc..95d08a05fe 100644
--- a/tests/valgrind.pm
+++ b/tests/valgrind.pm
@@ -25,7 +25,7 @@
 package valgrind;
 
 use strict;
-use warnings 'FATAL' => 'all';
+use warnings;
 
 BEGIN {
     use base qw(Exporter);