use Imager;
print "Has truetype\n" if $Imager::formats{tt};