Certo, mas caso voce nao queira utilizar o DBI voce pode seguir o seguinte
conceito:
#Conecte ao Banco de Dados, vamos supor que voce chamou o seu descritor de
$conexao
#Fazendo a consulta ...
$consulta = $conexao->(query da consulta);
@saida = $consulta->fetchrow;
#Agora o vetor @saida contem o resultado da sua consulta (as colunas)
#no caso de voce ter mais de uma linha de resposta voce pode fazer o
seguinte, utilizando a mesma consulta
$consulta = $conexao....
$aux = $consulta->numrows;
$aux--;
foreach $i (0 .. $aux)
{
$consulta->dataseek($i);
@saida = $consulta->fetchrow;
print ...
}
eh isso
T+
[]s
------------------------------------------------------
[aechiara@pinga]~$ rm -rf *
^C^C^C
[aechiara@pinga]~$ ls -l
total 0
[aechiara@pinga]~$ Ahhhh ........
bash: Ahhhh: command not found
[aechiara@pinga]~$ logout
Connection to pinga closed.
/"\
\ /
X ASCII RIBBON CAMPAIGN - AGAINST HTML MAIL
/ \ CAMPANHA DA FITA ASCII - CONTRA MAIL EM HTML
Linux ... a nice place to live
*******************************************
* Alex Eduardo Chiaranda *
* mail: [EMAIL PROTECTED] *
* [EMAIL PROTECTED] *
* [EMAIL PROTECTED] *
* Pagina => http://www.eep.br/~aechiara *
* ICQ => UIN 13070511 *
* 4o Ano de Ciencia da Computacao *
* Escola de Engenharia de Piracicaba *
* Piracicaba - SP *
*******************************************
On Fri, 26 Jan 2001, Guilherme A. Mendes wrote:
> Olá Luciano,
>
> Em Perl, nós utilizamos geralmente o DBI para acessar o mySQL. É um módulo
> muito bom, nos quais você vai ter quase a mesma coisa que terá em PHP .
>
> Você pode baixar e instalar o módulo ( pelo PPM ) em:
> http://www.symbolstone.org/technology/perl/DBI/index.html
>
> Um exemplo prático de jogar o campo pra variável ( isso depois de ter
> conectado ao servidor ):
>
> $c = $sth->fetchrow_hashref;
> print "$c->{'campo'}\n";
>
> Claro, você precisa ler documentações para se informar melhor das funções do
> mySQL e do DBI.
>
> [ ]'s
> ............................................................................
> : Guilherme A. Mendes
> : #ICQ: 23662971
> : E-mail: [EMAIL PROTECTED]
> :
> : GM9 Technology
> : http://www.gm9.com.br
> ............................................................................
> : Lista de discussão GM9 Perl - http://www.gm9.com.br/perl
>
>
> ----- Original Message -----
> From: Luciano <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Friday, January 26, 2001 3:46 PM
> Subject: [perl] Re: Mysql e Perl
>
>
> > Olá Amigos,
> >
> > Estou querendo utilizar o MySQL com o Perl mas ainda tenho uma duvida que
> > nos livros que eu comprei não foram esclarecidas, ou por serem obvias ou
> > falha do livro mesmo....
> >
> > Minha duvida é a seguinte:
> > Como eu faço para pegar os dados de cada coluna em uma tabela e coloca-los
> > em variáveis?
> > Eu estou começando agora a trabalhar com banco de dados relacional e não
> > peguei o pulo do gato ainda !! :)
> >
> > Para fazer isso com bando de dados em ASCII eu uso o comando split para
> > separar os dados por delimitadores | .
> >
> > Qual é o segredo no MySQL?
> > Usando o PHP tem o comando List que faz isso.
> > E no Perl qual comando ?
> >
> > Obrigado pela Atenção.
> > Abraços
> > Luciano
> >
> >
> >
> > --------------------------------------------------------------------------
> ----
> > Lista GM9 Perl - http://www.gm9.com.br/perl
> > Informações gerais, cadastramento e descadastramento
> >
>
> ------------------------------------------------------------------------------
> Lista GM9 Perl - http://www.gm9.com.br/perl
> Informações gerais, cadastramento e descadastramento
>
------------------------------------------------------------------------------
Lista GM9 Perl - http://www.gm9.com.br/perl
Informações gerais, cadastramento e descadastramento
