Um eine bessere Übersicht in einer Listenausgabe
zu erhalten, bietet es sich an, die Hintergrundfarben in jeder Zeile zu
wechseln. Dabei kommt der interne Zähler $_loop zum Einsatz.
<table border=1
cellpadding=2><tr><td><b>Name</b></td><td><b>Alter</b></td></tr>
<loop code=perl>
if ($_loop % 2 == 0)
{
out "<tr bgcolor=\"#a0a0a0\">";
}else
{
out "<tr bgcolor=\"#e0e0e0\">"
}
out "<td>$name</td><td>$alter</td></tr>";
</loop>
</table> |
Dieser Code führt zu folgender Ausgabe:
| Name
|
Alter
|
| Hans Mittig
|
68
|
| Bill Gates
|
45?
|
| Madonna
|
zu alt
|
| Christoph Bergmann
|
sagichnicht
|