diff --git a/tests/ftp.pm b/tests/ftp.pm
index af48717334f6a47d66b09c9d88e14d842a1efb34..7c4fe951f10ef32518c06eb3bacdbc6ff3a03604 100644
--- a/tests/ftp.pm
+++ b/tests/ftp.pm
@@ -21,6 +21,9 @@
 # $Id$
 ###########################################################################
 
+use strict;
+use warnings;
+
 #######################################################################
 # pidfromfile returns the pid stored in the given pidfile.  The value
 # of the returned pid will never be a negative value. It will be zero
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index f245c7c0a62cdfc3ffe89d605d1a7cd59be8428f..c832aa618d2d4264787dca9ca73f3b4a620770e3 100644
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -38,6 +38,7 @@
 #
 
 use strict;
+use warnings;
 use IPC::Open2;
 
 require "getpart.pm";