From 28957cb37c682c2059e2f873c1615055bfd98a11 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Wed, 9 Jul 2025 23:27:13 +0200 Subject: [PATCH] libtests: enable strict/warnings, fix formatting --- tests/libtest/mk-lib1521.pl | 2 ++ tests/libtest/test1013.pl | 3 +++ tests/libtest/test1022.pl | 3 +++ tests/libtest/test307.pl | 3 +++ tests/libtest/test610.pl | 3 +++ tests/libtest/test613.pl | 3 +++ 6 files changed, 17 insertions(+) diff --git a/tests/libtest/mk-lib1521.pl b/tests/libtest/mk-lib1521.pl index 8f207a2d14..6772cdb45a 100755 --- a/tests/libtest/mk-lib1521.pl +++ b/tests/libtest/mk-lib1521.pl @@ -22,6 +22,8 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; # Usage: # perl mk-lib1521.pl < ../../include/curl/curl.h lib1521.c diff --git a/tests/libtest/test1013.pl b/tests/libtest/test1013.pl index 878077d80c..6cf6727b9b 100755 --- a/tests/libtest/test1013.pl +++ b/tests/libtest/test1013.pl @@ -22,6 +22,9 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; + # Determine if curl-config --protocols/--features matches the # curl --version protocols/features if($#ARGV != 2) { diff --git a/tests/libtest/test1022.pl b/tests/libtest/test1022.pl index 4427d633b5..e1c3cd598e 100755 --- a/tests/libtest/test1022.pl +++ b/tests/libtest/test1022.pl @@ -22,6 +22,9 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; + # Determine if curl-config --version matches the curl --version if($#ARGV != 2) { print "Usage: $0 curl-config-script curl-version-output-file version|vernum\n"; diff --git a/tests/libtest/test307.pl b/tests/libtest/test307.pl index ea54b59824..c3f31402e0 100755 --- a/tests/libtest/test307.pl +++ b/tests/libtest/test307.pl @@ -22,6 +22,9 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; + # Determine if the given curl executable supports the 'openssl' SSL engine if($#ARGV != 0) { print "Usage: $0 curl-executable\n"; diff --git a/tests/libtest/test610.pl b/tests/libtest/test610.pl index b37c25286a..10f665620a 100755 --- a/tests/libtest/test610.pl +++ b/tests/libtest/test610.pl @@ -22,6 +22,9 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; + # Perform simple file and directory manipulation in a portable way if($#ARGV <= 0) { print "Usage: $0 mkdir|rmdir|rm|move|gone path1 [path2] [more commands...]\n"; diff --git a/tests/libtest/test613.pl b/tests/libtest/test613.pl index 9abc0c41cd..429168abfc 100755 --- a/tests/libtest/test613.pl +++ b/tests/libtest/test613.pl @@ -22,6 +22,9 @@ # SPDX-License-Identifier: curl # ########################################################################### +use strict; +use warnings; + # Prepare a directory with known files and clean up afterwards use Time::Local;