The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use vars qw( $MAGICK_SKIP );

BEGIN {
   my $eok = eval {
      require Image::Magick;
      1;
   };
   if ( $@ || ! $eok ) {
      $MAGICK_SKIP  = "You don't have Image::Magick installed. $@";
   }
   elsif ( $Image::Magick::VERSION lt '6.0.4') {
      $MAGICK_SKIP = q{There may be a bug in your PerlMagick version's }
                   . "($Image::Magick::VERSION) QueryFontMetrics() method. "
                   . q{Please upgrade to 6.0.4 or newer.};
   }
   else {
      $MAGICK_SKIP = q{};
   }
}

1;