10 entries, 1 page |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
use CGI qw/:all/; print header(); print start_html(-title=>'Mein Titel'); my @table; for (@irgendwas) { push @table,Tr( td({-width=>'50%'},'Trallala'), td({-width=>'50%'},'Zweite Zelle') ); } print table(@table),end_html; exit 0;
10 entries, 1 page |