[Cascavel-pm] Função select (DBI::MySQL)

[Luis Champs de Carvalho]

On Fri, 9 Jul 2004, Rod Za wrote:
> Olá,
>
> Estou pensando em fazer uma função genérica para o comando select usando
> DBI::MySQL. A função é mais ou menos assim:
>
> _BEGIN_
> sub select{
>     my $select = shift;
>     my $from = shift;
>     my $where = shift;
>     my $query = "SELECT $select FROM $from ";
>         defined($where) ? $query .= "WHERE $where;" : $query .= ";";
>         my $sth = $self->{dbh}->prepare($query) or die "Erro ao executar prepre: $!";
>         $sth->execute() or die "Erro ao tentar executar a query: $query. $!";
>         my @res;
>         while(my @rows = $sth->fetchrow_array){
>                 push @res, @rows;
>         }
>         return @res;
> }
> _END_
>
> A função funciona bem retornando um array com todos os campos do select.
>
> Eu queria modificar esta função para retornar um hash do tipo:
> { NOME_CAMPO_SELECT2 => valor_retornado_por_fetchrow_array,
>   NOME_CAMPO_SELECT1 => valor_retornado_por_fetchrow_array,
> }
>
> Alguém tem alguma sugestão?
>

  Oies, Rodrigo.

  Acho que você poderia se beneficiar das bibliotecas Im::DBI e
Class::DBI, que implementam isso de uma forma mais simples, poderosa e
fácil de usar.

  Claro, você precisa aprender a usar estas bibliotecas, mas isso 30
minutos de manual resolvem.

  Putamplexos!
-- 
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
  Luis Campos de Carvalho is BSc in Comp Science,
  PerlMonk [SiteDocClan], Cascavel-pm Moderator,
  Unix Sys Admin && Certified Oracle DBA
  http://br.geocities.com/monsieur_champs/
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=