Olá Monges, bem estou criando um módulo para controle de conexões e queries, que esta funcionando +- da seguinte maneira:<br><br>2 use Control::DataBase;<br>3 my $dbh_qry = Control::DataBase-&gt;new('finish','221442');<br><br>Crio um objeto com o id&nbsp; da query(finish) e com o parâmetro para esta query, ao buscar minha query no xml e substituir o parâmetro em seu devido lugar, faço o execute em outro módulo.<br>Até ai tudo bem, porém queria fazer algo para facilitar a saida destas queries, usando os métodos do DBI fetchrow_hashref e arrayref, porém não estou conseguindo transmitir os dados de forma que eu possa com um método particular fazer algo assim:<br>4 while(my $ref = $dbh_qry-&gt;fetch_ref_array)&nbsp;&nbsp;  {<br><br>Pensei em meu módulo fazer algo assim:<br>return $self-&gt;{_sth}-&gt;fetchrow_hashref;<br><br>_sth é o atributo onde está a query.<br><br>Alguém tem uma luz ??<br><br>Abraços a todos.<br><br><br><br><br><p>&#32;
      

      <hr size="1"> 
Ne gardez plus qu'une seule adresse mail ! <a href="http://fr.rd.yahoo.com/mail/mail_taglines/trueswitch/*http://www.trueswitch.com/yahoo-fr/">Copiez vos mails</a> vers Yahoo! Mail