sybperl-l Archive

From: David C Worenklein <dcw at gcm dot com>
Subject: Re: SybPerl-DBlib question...
Date: Jan 26 1999 6:28PM

You need to call dbresults in a loop

while($dbh->dbresults!=NO_MORE_RESULTS) {
   $ret_status = $dbh->DBCOUNT ;
   print "ret status: $ret_status \n";
   while(%dbdata=$dbh->dbnextrow(1))
   {
      print "fld1: $dbdata{fld1} \n";
   }
}