<loop code=perl db=/veranstaltungen sort=datum,uhrzeit>
if (datum("jetzt","intern") lt datum($datum,"intern"))
{
if ($cnt % 2 == 0)
{
out "<tr bgcolor=\"#ffff00\">";
}else
{
out "<tr bgcolor=\"#00ffff\">"
}
out "<td><p><b>$datum, $uhrzeit $uhrzeit_ende Uhr, $ort, $titel</b><br>
$text<br>
<a href=\"$link_url\" target=\"$target\">$link_text</a>"; 
if ($ausgebucht)
{
out <<EOF
<font color=\"#FF0000\"><b>Leider schon ausgebucht!</b></font>
EOF
}
out "</p></td>";
$cnt++;
}
</loop>