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
 

Responder a