I've only done this using ActivePerl on NT, so I don't know if it will work on other platforms, but something like this:

$image->Annotate(font=>'@/full/path/to/font.ttf', x=>10, y=>10, points
+ize=>24, pen=>blue, text=>'Ta-Daa.');
[download]

might work... using any true type (maybe other formats too?) font.