Minimal pod, and removed req on YAML - tests will skip all if not found

[catagits/HTTP-Body.git] / t / 05urlencoded.t

diff --git a/t/05urlencoded.t b/t/05urlencoded.t
index afcc020..6d0d3ca 100644 (file)
--- a/t/05urlencoded.t
+++ b/t/05urlencoded.t
@@ -3,13 +3,21 @@
 use strict;
 use warnings;
 
-use Test::More tests => 5;
+use Test::More 
+
+eval { require YAML; import YAML 'LoadFile'; };
+if ($@) {
+  eval { require YAML::Syck; import YAML::Syck 'LoadFile'; }
+}
+
+plan skip_all => 'Tests need YAML or YAML::Syck' if $@;
+
+plan tests => 5;
 
 use Cwd;
 use HTTP::Body;
 use File::Spec::Functions;
 use IO::File;
-use YAML;
 
 my $path = catdir( getcwd(), 't', 'data', 'urlencoded' );