[Cascavel-pm] Duvida com DBI

[Lorn]

agora funcionou
que função complicada hein?
eu estava tentando desreferenciar aqui e não esta conseguindo obrigado
pela ajuda de todos.

On 5/12/05, Marco Lima <marco.lima em e-via.com.br> wrote:
> Tente algo assim:
> 
> my $sth = $dbh->prepare("SELECT login " .
>                         "  FROM tblala " .
>                         " WHERE teste = 'alguamcoisa'" .
>                         "   AND active = 'Y' ");
> 
> $sth->execute();
> 
> my $array_ref = $sth->fetchall_arrayref( { login => 1, } );
> 
> foreach my $row (@$array_ref) {
> 
>     print "Row: $row->{login}\n";
> 
> }
> 
> > Eu ia perguntar justamente isso, porque meu array não está sendo
> preenchido
> > $sth->execute or &FatalError("cant query SQL");
> > while (($host) = $sth->fetchrow_array)
> > {
> >         @hosts="$host";
> > }
> >
> > #$sth->finish;
> > $dbh->disconnect;
> > print @hosts;
> >
> > Se eu colocar o print @hosts dentro do while funciona, mas fora não,
> > acho que estou sobreescrevendo o array
> > Marcos eu tentei fazer do jeito que voce falou até achei legal a
> > ideia, mas meu array fica só com isso "ARRAY(0x9e49614)"
> > não sei porque.
> > On 5/12/05, Marco Lima <marco.lima em e-via.com.br> wrote:
> > > Para ficar mais emocionante e "rápido" :
> > >
> > > >> $sth = $dbh->prepare("SELECT login FROM tblala WHERE teste =
> > > >> 'alguamcoisa' and active = 'Y' ; " );
> > > >>
> > > >> $sth->execute or &FatalError("cant query SQL");
> > > >> while (($host) = $sth->fetchrow_array)
> > > >> {
> > >
> > > @array = $dbh->selectall_arrayref("SELECT login " .
> > >                                    "  FROM tblala " .
> > >                                    " WHERE teste = 'alguamcoisa'" .
> > >                                    "   AND active = 'Y' ");
> > >
> > > ## Retorna um array de referências dos valores consultados
> > >
> > >
> > > >
> > > > --- Lorn <lorn.br em gmail.com> escreveu:
> > > > > Entao como vou fazer o for / while?
> > > > > geralmente faria
> > > > > for i=0;i<10;i++
> > > > >     print $array[i];
> > > > > Mas como vou fazer pra imprimir item a item do
> > > > > array?
> > > >
> > > > Desculpe, eu apaguei o código original. Eu imagino que
> > > > você queria receber uma resposta do banco em um array.
> > > > Se não era isso, então por favor ignore meu
> > > > comentário.
> > > >
> > > > Agora se for isso mesmo... esqueça o for e use
> > > > foreach.
> > > >
> > > > foreach (@array_de_resposta) {
> > > >
> > > >     print;
> > > >
> > > > }
> > > >
> > > > Você pode usar o map também para fazer isso:
> > > >
> > > > map { print } @array_de_resposta;
> > > >
> > > > []'s
> > > >
> > > >
> > > > Alceu Rodrigues de Freitas Junior
> > > > --------------------------------------
> > > > glasswalk3r em yahoo.com.br
> > > > http://www.imortais.cjb.net
> > > >
> -----------------------------------------------------------------------
> > > > A well-used door needs no oil on its hinges.
> > > > A swift-flowing stream does not grow stagnant.
> > > > Neither sound nor thoughts can travel through a vacuum.
> > > > Software rots if not used.
> > > > These are great mysteries -- The Tao Of Programming, 5.1
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > ____________________________________________________Yahoo! Mail, cada
> > > vez melhor: agora com 1GB de espaço grátis! http://mail.yahoo.com.br
> > > > _______________________________________________
> > > > Cascavel-pm mailing list
> > > > Cascavel-pm em pm.org
> > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > >
> > > >
> > >
> > > Marco Lima
> > > J. A. P. H.
> > >
> > > marco.lima em e-via.com.br
> > > mago em rio.pm.org
> > >
> > > +55 19 96 56 06 46
> > >
> > > Sociedade Perl do Brasil   |   http://www.perl.org.br
> > > Perl Monks                 |   http://www.perlmonks.org
> > > Brasil Perl Mongers        |   http://brasil.pm.org
> > >
> > > Register Linux User #355235
> > > Slackware Linux, for the subgenius
> > >
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> >
> >
> > --
> > Lorn
> > - Slackware Linux
> > www.slackwarezine.com.br
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
> 
> Marco Lima
> J. A. P. H.
> 
> marco.lima em e-via.com.br
> mago em rio.pm.org
> 
> +55 19 96 56 06 46
> 
> Sociedade Perl do Brasil   |   http://www.perl.org.br
> Perl Monks                 |   http://www.perlmonks.org
> Brasil Perl Mongers        |   http://brasil.pm.org
> 
> Register Linux User #355235
> Slackware Linux, for the subgenius
> 
> 


-- 
Lorn 
- Slackware Linux
www.slackwarezine.com.br