--- a/dnssec-keytool.pl	Tue Dec 21 13:53:39 2010 +0100
+++ b/dnssec-keytool.pl	Tue Dec 21 13:55:01 2010 +0100
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#! /usr/bin/perl
 
+use warnings;
 use strict;
 use FindBin;
 

--- a/zone-mk.pl	Tue Dec 21 13:53:39 2010 +0100
+++ b/zone-mk.pl	Tue Dec 21 13:55:01 2010 +0100
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl 
 
+use warnings;
 use strict;
 use FindBin;
 

--- a/zone-rm.pl	Tue Dec 21 13:53:39 2010 +0100
+++ b/zone-rm.pl	Tue Dec 21 13:55:01 2010 +0100
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl 
 
+use warnings;
 use strict;
 use File::Path;
 use FindBin;