dselect: Use strict and warnings pragmas

Move the warnings from the shebang into a proper pragma, so that we are
sure it will be enabled regardless of the script being called explicitly
without the flag.

1 files changed, 3 insertions, 2 deletions

diff --git a/dselect/setup b/dselect/setup
index ba1a4ca33..ac910d1c1 100755
--- a/dselect/setup
+++ b/dselect/setup
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 #                              -*- Mode: Perl -*- 
 # setup.pl --- 
 # Author           : Manoj Srivastava ( srivasta@tiamat.datasync.com ) 
@@ -14,7 +14,8 @@
 # This file is designed to go into /usr/lib/apt/methods/setup
 # 
 
-#use strict;
+use strict;
+use warnings;
 #use diagnostics;
 #printf STDERR "DEBUG: Arguments $ARGV[0];$ARGV[1];$ARGV[2];\n";