selftest: enable perl warnings

After this we will see more noise with each test run, and these
warnings will be addressed in following commits.

Signed-off-by: Douglas Bagnall <douglas.bagnall@catalyst.net.nz>
Reviewed-by: Gary Lockyer <gary@catalyst.net.nz>
Reviewed-by: Andrew Bartlett <abartlet@samba.org>

diff --git a/selftest/SocketWrapper.pm b/selftest/SocketWrapper.pm
index ef8058da79481de205a60db10c3b8edc651291cb..67a4ec96ca64b93770e2148916be26ea2ea3f047 100644 (file)
--- a/selftest/SocketWrapper.pm
+++ b/selftest/SocketWrapper.pm
@@ -24,6 +24,7 @@ use Exporter;
 @EXPORT_OK = qw(setup_dir setup_pcap set_default_iface);
 
 use strict;
+use warnings;
 use FindBin qw($RealBin);
 
 sub setup_dir($$)

diff --git a/selftest/Subunit.pm b/selftest/Subunit.pm
index 07f4b8ff97ddb22853261de7515be2f500a3638a..07f3ac28ddff437d514f16a83d0decd03c17a6a2 100644 (file)
--- a/selftest/Subunit.pm
+++ b/selftest/Subunit.pm
@@ -22,6 +22,7 @@ require Exporter;
 @ISA = qw(Exporter);
 
 use strict;
+use warnings;
 
 sub start_test($)
 {

diff --git a/selftest/selftest.pl b/selftest/selftest.pl
index b6094fef3b98be45b5a59c2ab977fdaa7d9e5891..a1f2183a4cc184c155e099a11dae841479249bac 100755 (executable)
--- a/selftest/selftest.pl
+++ b/selftest/selftest.pl
@@ -17,6 +17,7 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 use strict;
+use warnings;
 
 use FindBin qw($RealBin $Script);
 use File::Spec;

diff --git a/selftest/target/Samba.pm b/selftest/target/Samba.pm
index a908a7ade7c5f8f20f78b82c14bce0a94de6bb92..0cfa5c57dd50e661421fbb64ab7c0f76bb4b31e3 100644 (file)
--- a/selftest/target/Samba.pm
+++ b/selftest/target/Samba.pm
@@ -6,6 +6,7 @@
 package Samba;
 
 use strict;
+use warnings;
 use target::Samba3;
 use target::Samba4;
 use POSIX;

diff --git a/selftest/target/Samba3.pm b/selftest/target/Samba3.pm
index 991963b6074fc666eddfc7a5eb3eab7cef586173..a9d713d6a3b3dab46c0f864dab290b3efbe6c976 100755 (executable)
--- a/selftest/target/Samba3.pm
+++ b/selftest/target/Samba3.pm
@@ -9,6 +9,7 @@
 package Samba3;
 
 use strict;
+use warnings;
 use Cwd qw(abs_path);
 use FindBin qw($RealBin);
 use POSIX;

diff --git a/selftest/target/Samba4.pm b/selftest/target/Samba4.pm
index da9f0a00e912511585d7b51916bc05e2855f7384..89f0615fabd37dd8a5d096a5da8c881e13239d21 100755 (executable)
--- a/selftest/target/Samba4.pm
+++ b/selftest/target/Samba4.pm
@@ -9,6 +9,7 @@
 package Samba4;
 
 use strict;
+use warnings;
 use Cwd qw(abs_path);
 use FindBin qw($RealBin);
 use POSIX;