Perl - MySQL

[timothy]

Hallo,

while (my @data = $sth->fetchrow_array)
{
  print "Spalte 1: $data[0], Spalte 2: $data[1], ...";

Das ist so richtig. Eine andere Variante (bei relativ wenigen Variablen) die ich häufig anwende:

$sth=$db->prepare("SELECT var1, var2, var3... FROM datenbank WHERE ...);
$sth->execute();

while (($var1, $var2, $var3) = $sth->fetchrow_array())
{ und hier die einzelnen Variablen verwenden }

Und wenn Du die Variablennamen analog der Feldbezeichenr in der Datenbank verwendest, brauchst Du nicht soviel über die Indices nachdenken.

Gruß
Timothy