DBI und MS-Access Verbesserungsmöglichkeiten - #34506 (Datenbanken und Verzeichnisdienste)

Strat

2006-07-12 14:54

User since
2003-08-04
5246 Artikel
ModeratorIn

Code: (dl )

while ( @row_ary = $sth->fetchrow_array ) {

durch:

Code: (dl )

while( my $dataHRef = $sth->fetchrow_hashref() ) {

dann hast du die "Zeile" in einer Hashreferenz, deren Keys die Feldnamen sind, z.B.

Code: (dl )

while( my $dataHRef = $sth->fetchrow_hashref() ) {
  foreach my $fieldname (sort keys %$dataHRef) {
    print "$fieldname => '$dataHRef->{$fieldname}'\n";
  } # foreach
} # while

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/