The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl -w

use Test::More;
use strict;
my $tests;

BEGIN
   {
   $tests = 11;
   plan tests => $tests;
   chdir 't' if -d 't';
   use lib '../lib';
   };

SKIP:
  {
  skip( 'Test::Pod not installed on this system', $tests )
    unless do
      {
      eval ("use Test::Pod;");
      $@ ? 0 : 1;
      };
  for my $m (qw[ 
    Info.pm
    TIFF.pm
    Info/BMP.pm
    Info/GIF.pm
    Info/JPEG.pm
    Info/PNG.pm
    Info/PPM.pm
    Info/SVG.pm
    Info/TIFF.pm
    Info/XBM.pm
    Info/XPM.pm
    ])
    {
    pod_file_ok( '../lib/Image/' . $m );
    }
  }