Remove use of Taint in tests.

Also, ensure all tests files do not include the shebang.
t/query.t had a join() over an array with undef values; fix that.

4 files changed, 1 insertions, 7 deletions

diff --git a/t/cwd.t b/t/cwd.t
index 6ea5560..b630254 100644
--- a/t/cwd.t
+++ b/t/cwd.t
@@ -1,5 +1,3 @@
-#!perl -T
-
 use strict;
 use warnings;
 
diff --git a/t/file.t b/t/file.t
index d5d296e..4a7fd0b 100644
--- a/t/file.t
+++ b/t/file.t
@@ -1,5 +1,3 @@
-#!perl -T
-
 use strict;
 use warnings;
 
diff --git a/t/ipv6.t b/t/ipv6.t
index 5dfb337..48c31f0 100644
--- a/t/ipv6.t
+++ b/t/ipv6.t
@@ -1,5 +1,3 @@
-#!perl
-
 use strict;
 use warnings;
 
diff --git a/t/query.t b/t/query.t
index f095fef..e855153 100644
--- a/t/query.t
+++ b/t/query.t
@@ -82,7 +82,7 @@ is $u, "?a=1;b=2";
 
 $u->query('a&b=2');
 @q = $u->query_form;
-is join(":", @q), "a::b:2";
+is join(":", map { defined ? $_ : '' } @q), "a::b:2";
 ok !defined($q[1]);
 
 $u->query_form(@q);