ctaustin has asked for the wisdom of the Perl Monks concerning the following question:
while ((@cols)=$sth->fetchrow_array){ print OFILE join "$delimiter" => (@cols),"\n"; } #end while
while ((@cols)=$sth->fetchrow_array||die("unable to print row $DBI::er +rstr\n")){ print OFILE join "$delimiter" => (@cols),"\n"; } #end while
if ($DBI::errstr) {die("error $DBI::errstr\n");}
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: fetchrow_array memory usage
by Zaxo (Archbishop) on Jun 22, 2005 at 01:26 UTC | |
|
Re: fetchrow_array memory usage
by davidrw (Prior) on Jun 22, 2005 at 01:32 UTC | |
by ctaustin (Sexton) on Jun 22, 2005 at 05:08 UTC |