From 5568a6cc1ef6241cd5dd16357e6c7a7b93e289eb Mon Sep 17 00:00:00 2001
From: Marcin Kasperski <none@none>
Date: Thu, 15 Nov 2012 09:18:27 +0100
Subject: [PATCH] Switching from shell cp to File::Copy. It:

- is slightly faster (no subprocess)

- makes it possible to use Crypt::PWSafe3 under perl -T (taint mode)
  { older version generated errors Insecure $ENV{PATH} while running with -T switch }

- should resolve problems with running and testing on Windows
  (http://www.cpantesters.org/cpan/report/5be028b2-d2ec-11e1-853f-cec147eb5e0d
   http://www.cpantesters.org/cpan/report/ea8cb70f-6e9c-1014-b601-c7411ede6b02
   http://www.cpantesters.org/cpan/report/2dd017ec-6c05-1014-a000-7353ce65dec9 )
---
 lib/Crypt/PWSafe3.pm | 2 +-
 t/run.t              | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/Crypt/PWSafe3.pm b/lib/Crypt/PWSafe3.pm
index 570a821..8edee12 100644
--- a/lib/Crypt/PWSafe3.pm
+++ b/lib/Crypt/PWSafe3.pm
@@ -15,7 +15,7 @@ use Digest::HMAC;
 use Digest::SHA;
 use Crypt::Random qw( makerandom );
 use Data::UUID;
-use Shell qw(mv cp);
+use File::Copy qw(cp);
 use File::Spec;
 use FileHandle;
 use Data::Dumper;
diff --git a/t/run.t b/t/run.t
index c59b340..2fd4079 100644
--- a/t/run.t
+++ b/t/run.t
@@ -1,4 +1,5 @@
-# -*-perl-*-
+#!perl -T
+#
 # testscript for Crypt::PWSafe3 Classes by Thomas Linden
 #
 # needs to be invoked using the command "make test" from