#!/usr/bin/perl -w

use strict;
use warnings;
use diagnostics;
my $is_Magick = 0;

eval "require Image::Magick";

if ($@) {
  # problems with GD, fall back to non-GD
} else {
  # we have GD, go for it!
  $is_Magick = 1;
}

print "Content-type: text/html; charset=ISO-8859-1\n\n";

print $is_Magick;