Add strict/warnings

Author: toddr

Makefile.PL

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use ExtUtils::MakeMaker;
 
 # Calculate the dependencies
@@ -56,7 +59,7 @@ WriteMakefile(
     VERSION_FROM => 'lib/IPC/Run.pm',
     ( $ExtUtils::MakeMaker::VERSION >= 6.3002 ? ( 'LICENSE' => 'perl', ) : () ),
     PREREQ_PM => {
-        Test::More => '0.47',
+        'Test::More' => '0.47',
         %PREREQ_PM,
     },
     dist       => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },

lib/IPC/Run.pm

@@ -1011,6 +1011,7 @@ in their exit codes.
 =cut
 
 use strict;
+use warnings;
 use Exporter ();
 use vars qw{$VERSION @ISA @FILTER_IMP @FILTERS @API @EXPORT_OK %EXPORT_TAGS};
 
@@ -1047,6 +1048,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use IPC::Run::Debug;
 use Exporter;
 use Fcntl;

lib/IPC/Run/Debug.pm

@@ -67,6 +67,7 @@ Both of those are untested.
 ## it can be suppressed by "use IPC::Run ();".
 
 use strict;
+use warnings;
 use Exporter;
 use vars qw{$VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS};
 

lib/IPC/Run/IO.pm

@@ -63,6 +63,7 @@ out of Perl, this class I<no longer> uses the fields pragma.
 ## at some point.  Don't know how far how fast.
 
 use strict;
+use warnings;
 use Carp;
 use Fcntl;
 use Symbol;

lib/IPC/Run/Timer.pm

@@ -158,6 +158,7 @@ pragma.
 =cut
 
 use strict;
+use warnings;
 use Carp;
 use Fcntl;
 use Symbol;

lib/IPC/Run/Win32Helper.pm

@@ -20,6 +20,7 @@ contact me at [email protected], thanks!.
 =cut
 
 use strict;
+use warnings;
 use Carp;
 use IO::Handle;
 use vars qw{ $VERSION @ISA @EXPORT };

lib/IPC/Run/Win32IO.pm

@@ -24,6 +24,7 @@ A specialized IO class used on Win32.
 =cut
 
 use strict;
+use warnings;
 use Carp;
 use IO::Handle;
 use Socket;

lib/IPC/Run/Win32Pump.pm

@@ -27,6 +27,7 @@ It parses a bunch of command line parameters from IPC::Run::Win32IO.
 =cut
 
 use strict;
+use warnings;
 use vars qw{$VERSION};
 
 BEGIN {

t/adopt.t

@@ -9,6 +9,7 @@ adopt.t - Test suite for IPC::Run::adopt
 =cut
 
 use strict;
+use warnings;
 
 BEGIN {
     $|  = 1;

t/binmode.t

@@ -9,6 +9,7 @@ binary.t - Test suite for IPC::Run binary functionality
 =cut
 
 use strict;
+use warnings;
 
 BEGIN {
     $|  = 1;