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

[catagits/HTTP-Body.git] / t / 06octetstream.t

diff --git a/t/06octetstream.t b/t/06octetstream.t
index 87331a2..1b7c567 100644 (file)
--- a/t/06octetstream.t
+++ b/t/06octetstream.t
@@ -1,13 +1,21 @@
 use strict;
 use warnings;
 
-use Test::More tests => 8;
+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 => 8;
 
 use Cwd;
 use HTTP::Body;
 use File::Spec::Functions;
 use IO::File;
-use YAML;
 
 my $path = catdir( getcwd(), 't', 'data', 'octetstream' );