Hallo,
ich stehe immer mehr auf Kriegsfuß mit Perl. Vor allem was die Behandlung von Arrays, Hashes etc. betrifft.
Nungut. Ich hab also eine DB-Abfrage. Die läuft auch an und sollte mir am Ende ein paar Zeilen ausspucken. Mit fetchrow_array hol ich mir die Zeilen mit den 4 Spalten, um sie dann in einer Tabelle auszugeben. Die bleibt aber leer. Meine Hilfvariable (hab ich vorher mit 0 initialisiert) zählt brav die Anzahl der Ergebniszeilen mit und gibt mir am Ende die richtige Anzahl aus. Nur eben die Tabellenzeilen werden weder gefüllt noch angzeigt.
while (my ($date, $time, $host, $msgonly) = $sth->fetchrow_array){
$hilfe++;
$cgi->Tr( $cgi->td($date),
$cgi->td($time),
$cgi->td($host),
$cgi->td($msgonly));
};## end while
Sieht jemand den Fehler? Ich nämlich nicht.
Ein einfaches print $date etc. gibt mir übrigens die gewünschten Werte aus. Nur im $cgi->td($date); kommt nix.
Gruß,
Leeloo
--
"Als es noch keine Computer gab, war das Programmieren noch relativ einfach." - Edsger W. Dijkstra
"Als es noch keine Computer gab, war das Programmieren noch relativ einfach." - Edsger W. Dijkstra