[Cascavel-pm] perl e mysql

[Marco Lima]

TariK:

É melhor deixar o banco manipular os dados e depois vc extrai ... caso
tenha que utilizar dados externos ... bom seria melhor criar uma
estrutura para isso ... vc teria que detalhar melhor o que dseja fazer.

[ ]'s

Marco

> Valeu Marco, uma otima ajuda, saiu quase como eu to querendo.... sai
> na ordem certinho, so que eu queria que  venha como tabela mesmo...
> nao sei se e possivel, estou pesquisando e nao acho muita coisa.  O
> que estou tenatndo fazer e criar inumeras tabelas tabelas temporarias
> e mexer com elas e retornar no final a tabela que eu quero no formato
> de tabela.
> []'s
> Tarik Faria da Silva Gregorio
> 
> Em 03/05/05, Marco Lima<marco.lima em e-via.com.br> escreveu:
> > Salve Tarik !
> > 
> > Tente o seguinte:
> > 
> > #!/usr/bin/perl
> > use strict;
> > use DBI;
> > 
> > my $db="minhatabela";
> > my $host="localhost";
> > my $userid="usuario";
> > my $passwd="senha";
> > my $connectionInfo="DBI:mysql:database=$db;$host";
> > 
> > my $dbh = DBI->connect($connectionInfo,$userid,$passwd);
> > my $query = "SELECT name FROM oi";
> > my $sth = $dbh->prepare($query);
> > $sth->execute();
> > while (@row = $sth->fetchrow_array()) {
> >     print "Row: @row\n";
> > }
> > $sth->finish();
> > $dbh->disconnect;
> > 
> > ou se preferir basta:
> > 
> > #!/usr/bin/perl
> > use strict;
> > use DBI;
> > 
> > my $dbh = DBI->connect(DBI:mysql:database,"usuario","senha", {
> > RaiseError => 1, });
> > my $sth = $dbh->prepare("SELECT name FROM oi");
> > $sth->execute();
> > my $array_ref = $sth->fetchall_arrayref( { name => 1, } );
> > foreach my $row (@$array_ref) {
> >     print "Row: $row->{name}\n";
> > }
> > exit;
> > 
> > Espero ter ajudado !
> > 
> > [  ]'ção
> > 
> > 
> > > Ola Pessoal,
> > >
> > >   Estou tendo que fazer um script em perl para conectar ao mysql e
> > > estou precisando retornar  no formato de tabela so que nao estou tendo
> > > muito sucesso.
> > > Alguem tem como me ajudar??
> > >
> > > segue o codigo abaixo:
> > >
> > > #!/usr/bin/perl
> > >
> > >
> > > use DBI;
> > >
> > > my $db="minhatabela";
> > > my $host="localhost";
> > >
> > > my $userid="usuario";
> > > my $passwd="senha";
> > > my $connectionInfo="DBI:mysql:database=$db;$host";
> > >
> > >
> > > my $dbh = DBI->connect($connectionInfo,$userid,$passwd);
> > >
> > >
> > > my $query = "SELECT name FROM oi";
> > >
> > > my $sth = $dbh->prepare($query);
> > >
> > > $sth->execute();
> > >     print $sth;
> > >
> > > $sth->finish();
> > > $dbh->disconnect;
> > >
> > > -----------------
> > > Tarik Faria da Silva Gregorio
> > > _______________________________________________
> > > 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
> 
> 

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