my $gd_text = GD::Text->new() 
    or die GD::Text::error();
# using TrueType
$gd_text->set_font('funny.ttf', 12) 
    or die $gd_text->error;
# using Type 1 - Bodoni Bold Italic
$gd_text->set_font('bpbi____.pfb', 12) 
    or die $gd_text->error;