--- 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;