Warn everywhere, not just Unix

use warnings; is the portable way of doing #!/usr/bin/perl -w
Also use strict; in init-repository.

Signed-off-by: axis <qt-info@nokia.com>

diff --git a/configure b/configure
index b8ee11f..5ca40f3 100755 (executable)
--- a/configure
+++ b/configure
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl

 ####################################################################################################
 #
 # Mother script for Qt Modularization
 ####################################################################################################
 #
 # Mother script for Qt Modularization


@@ -8,6 +8,7 @@
 #
 ####################################################################################################
 use strict;
 #
 ####################################################################################################
 use strict;

+use warnings;

 
 use File::Basename;
 use File::Path;
 
 use File::Basename;
 use File::Path;

diff --git a/init-repository b/init-repository
index 4acc22c..ef2e6d5 100755 (executable)
--- a/init-repository
+++ b/init-repository
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl

 #############################################################################
 ##
 ## Copyright (C) 2011 Nokia Corporation and/or its subsidiary(-ies).
 #############################################################################
 ##
 ## Copyright (C) 2011 Nokia Corporation and/or its subsidiary(-ies).


@@ -40,6 +40,9 @@
 ##
 #############################################################################
 
 ##
 #############################################################################
 

+use strict;
+use warnings;
+

 my $force = 0;
 my $quiet = 0;
 my $nokia_developer = 0;
 my $force = 0;
 my $quiet = 0;
 my $nokia_developer = 0;