@row=$dbh->Query("select a, b from c where d=1")->FetchRow; 

##</code><code>##

 a1, b1 
 a2, b2