dselect: Use strict and warnings in perl scripts

dselect/methods/Debian/Dselect/Ftp.pm

@@ -18,6 +18,8 @@ use Exporter;
 use Data::Dumper;
 
 use strict;
+use warnings;
+
 use vars qw(@EXPORT %config $VAR1);
 
 @EXPORT = qw(yesno do_connect do_mdtm add_site edit_site

dselect/mkcurkeys.pl

@@ -18,6 +18,9 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
+use strict;
+use warnings;
+
 use Scalar::Util qw(looks_like_number);
 
 $#ARGV == 1 || die ("usage: mkcurkeys.pl <filename> <curses.h>");