From: robert_hiltibidal_at_cms08405@ccmailgw.state.il.us
Message-Id: <9906229300.AA930077109@ccmailgw.state.il.us>
Date: Tue, 22 Jun 99 13:44:48 -0600
To: <joden@lee.k12.nc.us>, <pgsql-interfaces@postgresql.org>
Subject: Re[2]: [INTERFACES] Perl Interface 
MIME-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit


     Afternoon,
     
     intriguing... however, how do I go to the next row? I tried a 
     variation earlier that looked like:
     
     while (@row = $result->fetchrow) {
           $string = join("\|",@row);
     }
     $result = $conn->getResult;
     
     
     I've also tried :
     
     while ($result = $conn->getResult) {
           while (@row = $result->fetchrow) {
                  $string = join("\|",@row);
           }
           push(@set,$string);
     }
     
     
     The goal is to get multiple rows into a single array. The answer is 
     probally very simple. 
     
     
     Thx,
     -Rob
     

______________________________ Reply Separator _________________________________
Subject: Re: [INTERFACES] Perl Interface 
Author:  James Olin Oden <joden@lee.k12.nc.us>  at INTERNET
Date:    06/22/1999 2:24 PM

Just change that $ret to @ret, and it will return the entire row. 
After that your code becomes something like:
     
   $query = "Select
username,password,knickname,emailaddy,forward,ip,date from temp";
   $conn = Pg::connectdb("dbname=$dbname"); 
   $result = $conn->exec($query);
   while (@row = $result->fetchrow) {
         @row = join("|", @row);
   }