Tomaten auf den augen - #109136 (Perl/CGI)

Struppi

2008-05-03 11:44

User since
2006-02-17
628 Artikel
BenutzerIn

Der HTML Code der damit ausgegeben wird, dürfte nicht das sein was man möchte. Hier arbeitet man besser mit einem Array

Code (perl): (dl )

my @table;
push @table, CGI::Tr( CGI::th([qw(Überschrift Datum Text)]));

while (my $news = $news_dbh->fetchrow_hashref() ){
push @table, CGI::Tr( 
  CGI::td(
    [$news->{ueberschrift},$news->{datum}, $news->{text}]
   )
);

}
print CGI::table(@table) ;