Replace old basic tests

libwww-perl · Mar 10, 2024 · aa53885 · aa53885
1 parent 8664d37
commit aa53885
Show file tree

Hide file tree

Showing 5 changed files with 23 additions and 99 deletions.
diff --git a/MANIFEST b/MANIFEST
@@ -3,6 +3,5 @@ lib/HTML/Tagset.pm
 Makefile.PL
 MANIFEST
 README.md
-t/00_about_verbose.t
-t/01_old_junk.t
+t/00-load.t
 t/pod.t
diff --git a/t/00-load.t b/t/00-load.t
@@ -0,0 +1,9 @@
+#!perl -w
+
+use Test::More tests => 1;
+
+use HTML::Tagset;
+
+diag( "Testing HTML::Tagset $HTML::Tagset::VERSION, Test::More $Test::More::VERSION, Perl $], $^X" );
+
+pass( 'Module loaded' );
diff --git a/t/00_about_verbose.t b/t/00_about_verbose.t
diff --git a/t/01_old_junk.t b/t/01_old_junk.t
diff --git a/t/pod.t b/t/pod.t
@@ -1,6 +1,15 @@
-#!perl -w
+#!perl
+
+use strict;
+use warnings;
 
 use Test::More;
-eval "use Test::Pod 1.14";
-plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
-all_pod_files_ok();
+
+my $module = 'Test::Pod 1.14';
+
+if ( eval "use $module; 1;" ) { ## no critic (ProhibitStringyEval)
+    all_pod_files_ok();
+}
+else {
+    plan skip_all => "$module required for testing POD";
+}