<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Ola, Grupo.<div><br></div><div><br></div><div> Quanto ao comando GRANT no mysql foi a 1a. coisa que fiz, mas tenho uma outra aplicação em C++ que esta conectando normalmente com o mesmo usuário e senha. Abaixo vou postar o código que estou usando para teste.</div><div><br></div><div> Obs: se acesso a maquina do IP abaixo localmente, trocando o ip por localhost, consigo normalmente fazer a conexão e extrair os dados.</div><div><br></div><div><br></div><div><div>#!/usr/bin/perl</div><div><br></div><div>use strict;</div><div>use DBI;</div><div><br></div><div>my $dbh = DBI->connect( </div><div> "dbi:mysql:dbname=mydb;host=192.168.0.107", </div><div> "usuario", </div><div> "senha", </div><div> { RaiseError => 1 }, </div><div>) or die $DBI::errstr;</div><div><br></div><div>my $sth = $dbh->prepare("SELECT VERSION()");</div><div>$sth->execute();</div><div><br></div><div>my $ver = $sth->fetch();</div><div><br></div><div>print @$ver;</div><div>print "\n";</div><div><br></div><div>$sth->finish();</div><div>$dbh->disconnect();</div><br><div>> Date: Tue, 21 May 2013 10:56:54 -0300<br>> From: andre@andrewalker.net<br>> To: saopaulo-pm@mail.pm.org<br>> Subject: Re: [SP-pm] DBI:mysql erro na conexão<br>> <br>> On Tue, May 21, 2013 at 10:31:57AM -0300, Ricardo Stock wrote:<br>> > Executa este comando no mysql para liberar o acesso GRANT ALL PRIVILEGES ON<br>> > *.* TO usuario@'%' IDENTIFIED BY 'senha de acesso' WITH GRANT OPTION;<br>> <br>> *medo*<br>> <br>> <br>> =begin disclaimer<br>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/<br>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org<br>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm><br>> =end disclaimer<br></div></div> </div></body>
</html>