diff --git a/t/tools/show_deprecated.t b/t/tools/show_deprecated.t index cc762d2..5e515d4 100644 --- a/t/tools/show_deprecated.t +++ b/t/tools/show_deprecated.t @@ -24,7 +24,17 @@ use lib qw(lib); use Test::More; use File::Spec::Functions; -use YAML qw/LoadFile/; + +eval {require YAML; YAML->import('LoadFile')}; +if ($@) { + plan(skip_all => "YAML.pm required for this test."); +} + +# List::MoreUtils.pm is also used by show_deprecated.pl +eval {require List::MoreUtils; List::MoreUtils->import('any')}; +if ($@) { + plan(skip_all => "List::MoreUtils.pm required for this test."); +} plan tests => 1; diff --git a/t/tools/show_experimental.t b/t/tools/show_experimental.t index 1352878..885d35f 100644 --- a/t/tools/show_experimental.t +++ b/t/tools/show_experimental.t @@ -24,7 +24,17 @@ use lib qw(lib); use Test::More; use File::Spec::Functions; -use YAML qw/LoadFile/; + +eval {require YAML; YAML->import('LoadFile')}; +if ($@) { + plan(skip_all => "YAML.pm required for this test."); +} + +# List::MoreUtils.pm is also used by show_deprecated.pl +eval {require List::MoreUtils; List::MoreUtils->import('any')}; +if ($@) { + plan(skip_all => "List::MoreUtils.pm required for this test."); +} plan tests => 1;