nadim: spalte formatieren mit perl

Beitrag lesen

also nochmal genauer erklärt:

danke erstmals
also nochmal.

habe eine tabelle mit

<table width="90%" height="186" border="2" cellpadding="0" cellspacing="0"><tr> <td><div align="center">1</div></td><td><div align="center">2</div></td><td><div align="center">3</div></td></tr><tr> <td><div align="center">4</div></td><td><div align="center">5</div></td><td><div align="center">6</div></td></tr></table>

so jetzt mache ich eine sql query mir random() -
und hol mir die datensätze.

mit einer while schleife

while (my @result = $sth->fetchrow_array) {                print qq {                                <tr>                 <td><div align="center">$result[1]</div></td>                <td><div align="center">$result[1]</div></td>                <td><div align="center">$result[1]</div></td>                </tr>                <tr>                 <td><div align="center">$result[1]</div></td>                <td><div align="center">$result[1]</div></td>                <td><div align="center">$result[1]</div></td>                </tr>        };}

das problem nun ist- das z.b datensatz 1 jeweils 3x in der selben spalte angezeigt wird.

ich möchte aber das jeweils in einer spalte der nächste datensatz steht.

D1 # D2 # D3

D4 # D5 # D6