use PDF::API2; use PDF::Table; my $pdftable = new PDF::Table; my $pdf = new PDF::API2(-file => "my_table.pdf"); my $page = $pdf->page; $page->mediabox(0,0,840,595); my $data = [ ["zeile1"], ["zeile2"], ["zeile3"], ["zeile4"], ["zeile5"], ["zeile6"], ["zeile7"], ["zeile8"], ["zeile9"], ]; $pdftable->table( $pdf, $page, $data, -x => 50, -start_y => 450, -next_y => 450, -start_h => 100, -next_h => 100, -max_word_length=> 20, -w => 690, -padding => 5, -padding_right => 10, -font=> $pdf->corefont("Helvetica Bold", -encoding => "utf8",), -font_size => 8, ); $pdf->save();