pointsize => 14,
);
$im->Read('label:'.join('', @_));
- $format = 'png' unless exists($format{$format});
+ $format = 'png' unless exists($formats{$format});
$mime_type = $formats{$format};
print $q->header(-type=>$mime_type);
$im->Write($format.':-');