use dipp::PDF::API2;
use CGI;
 my $q = CGI->new();
 my $pdf = new dipp::PDF::API2;
 my $page = $pdf->page;
 my $gfx = $page->gfx;
 my $bfont = $pdf->ttfont('fonts/arial.ttf', -encoding => 'latin1');  #'latin1' oder 'utf8' 
 
 print $q->header(-type => 'application/pdf', -attachment => 'dipp_process.pdf', -charset => 'latin1', -expires => '0s');  #'latin1' oder 'utf8' 
 
 $page->mediabox (612, 792);
 $txt = $page->text;
 $txt->font ($bfont, 12);
 $txt->translate (32, 634);
 $txt->text ('Fax');
 print $pdf->stringify;