Tabelle dynamisch mit perl ausgeben?

[Timo Krokowski]

Hallo,

ich wollte gerne eine Tabelle dynamisch mit perl ausgeben...

print $cgi->p($cgi->table(while($i<$Anzahl){
                    i++,
                    $cgi->Tr($cgi->td('hallo ',$i))}));

Das ganze funktioniert ohne die while Schleife einwandfrei, kann ich etwa keine Schleifen in Funktionen(Tr) aufrufen? weiß nicht mehr weiter!

Bitte helft mir!