my $font = Imager::Font->new(file => 'bettynoir.ttf');
print "err:".Imager->errstr."<br />";
# ERROR PRODUCED: Font type not found

$img->string(x => 50, y => 70,
             string => "Hello, World!",
             font => $font,
             size => 30,
             aa => 1,
             color => 'white');  
print "Font-error:".$img->errstr."<br />";
# ERROR PRODUCED: missing required parameter 'font'

# Check if Imager is t1 or truetype capable
print "Has truetype"      if $Imager::formats{tt};
print "Has t1 postscript" if $Imager::formats{t1};
print "Has Win32 fonts"   if $Imager::formats{w32};
print "Has Freetype2"     if $Imager::formats{ft2};