Olá Deivison,
Exato, o servidor não tem o 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: Deivison A. Elias <[EMAIL PROTECTED]>
To: <mailto:Undisclosed-Recipient:@pa03.conex.com.br>
Sent: Saturday, February 24, 2001 2:37 AM
Subject: [perl] Problemas com o DBI.pm
Olá amigos da lista
Estou tendo problemas em acessar MySQL via perl,
acontece o erro que listo abaixo.
Alguém tem alguma sugestão, estou achando que o problema é o servidor não
tem o DBI.pm. Será que é isso ou estou falando alguma asneira?
[servidor@servidor]$ perl esseque.pl
Can't locate DBI.pm in @INC (@INC contains: /usr/lib/perl5/5.6.0/i386-linux
/usr
/lib/perl5/5.6.0 /usr/lib/perl5/site_perl/5.6.0/i386-linux
/usr/lib/perl5/site_p
erl/5.6.0 /usr/lib/perl5/site_perl .) at esseque.pl line 2.
BEGIN failed--compilation aborted at esseque.pl line 2.
Script com erro:
#!/usr/bin/perl
use DBI;
$database = "bancodedados";
$hostname = "localhost";
$username = "nomedouser";
$password = " ";
$db = DBI->connect("DBI:mysql:$database:$hostname", $username, $password);
$query = $db->prepare("SELECT * FROM test");
$query->execute;
$numrows = $query->rows;
while (@array = $query->fetchrow_array) {
($field1, $field2, $field3) = @array;
print "field1 = $field1, field2 = $field2, field3 = $field3 \n";
}
$query->finish;
$db->disconnect;
exit;
Obrigado,
Deivison A. Elias
------------------------------------------------------------------------------
Lista GM9 Perl - http://www.gm9.com.br/perl
Informações gerais, cadastramento e descadastramento
