--- /dev/null
+#!perl -w\r
+use strict;\r
+use Test::More;\r
+use ExtUtils::Manifest qw(maniread);\r
+eval "use Test::Pod 1.00;";\r
+plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;\r
+my $manifest = maniread();\r
+my @pod = grep /\.(pm|pl|pod|PL)$/, keys %$manifest;\r
+plan tests => scalar(@pod);\r
+for my $file (@pod) {\r
+ pod_file_ok($file, "pod ok in $file");\r
+}\r
--- /dev/null
+#!perl -w\r
+use strict;\r
+use Test::More;\r
+eval "use Test::Pod::Coverage;";\r
+plan skip_all => "Test::Pod::Coverage required for POD coverage" if $@;\r
+\r
+plan tests => 1;\r
+pod_coverage_ok('Imager::Screenshot');\r