Hi!

How to underline text using PDF::API2?

Currently using following to print text:

   sub print_pdf_text {
    my $xp   = shift;
    my $yp   = shift;
    my $fnt  = shift;
    my $Mfnt = shift;
    my $text = shift;

    $txt->font( $fnt, $Mfnt);
    $txt->translate( $xp, $yp -= 12 );
    $txt->text( $text );
  }

Thanks,

Jerry


-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to