Não cara, De acordo com o que você reportou, o DBI->connect funcionou perfeitamente conforme especificado e não te enganou.
*Você* é que deixou passar que aspas duplas permitem interpolação de variáveis ao passo que aspas simples não permitem. Isso é um deslize comum, dentre vários outros, quando se está começando com o Perl. Não se preocupe, todo mundo passa por isso e estamos aqui pra dar o maior apoio. Só cuidado pra não "culpar o culpado errado" :) Perl tem alguns comportamentos considerados não usuais pra quem vem de outras linguagens, mas você vai perceber que tudo é bem documentado e muito consistente, na verdade. []'s 2013/5/21 Marcio Souza <marcio_run...@hotmail.com> > Sim, Blabos. > > > > Vou testar as possibilidade que você indicou, mas para não esquecer > mais disso estou criando uma função somente para tratar isso, realmente > ficou camuflado o problema pois a DBI->connect me enganou. > > ------------------------------ > From: bla...@gmail.com > Date: Tue, 21 May 2013 15:27:04 -0300 > > To: saopaulo...@mail.pm.org > Subject: Re: [SP-pm] DBI:mysql erro na conexão > > Opa, > > Ao invés de "blablabla\@blebleble" > > Experimenta 'blablabla@blebleble' > > ou ainda q{blablabla@blebleble} > > > 2013/5/21 Marcio Souza <marcio_run...@hotmail.com> > > Ola, Ricardo. > > Sim, tudo que estou fazendo e em ambiente de testes, tenho uma > maquina windows seven, nela tenho o virtualbox emulando uma maquina xp e > outra debian so para fazer testes entre elas. > > > Senhores, descobri a minha gafe, mas como sou iniciante em PERL por > favor me desculpem por tomar vosso tempo. Estou programando em PERL mas > ainda raciocino em C++, logo a confusão. > > Minha senha para acesso ao banco de dados tem caracteres especiais > juntamente com números e letras, logo justamente neste teste que estou > fazendo a senha estava com o caracter "@", só que como estava colocando a > senha junto com a função que conecta ao banco, não aparecia o problema, mas > quando peguei o exemplo indicado a senha e declarada em uma variável ai o > interpretador me indicou o "@" como um intruso, na mesma hora achei o > problema e resolvi colocando desta forma "\@". > > Mil desculpas novamente, mas realmente vou ter que penar muito ainda > para pensar em PERL, pois faz anos que programo em C++. > > > Mas como de toda situação adversa tiramos algo de bom, neste caso pelo > menos para mim, foi o contato com a LISTA, pois ainda não tinha postado > nada aqui, mesmo tendo me cadastrando faz 01 mês. Deu para sentir o empenho > de todos em resolver o problema dos outros e isso não tem preço quando > estamos em apuros. > > Grato a todos ... > > > > Marcio Souza > > > ------------------------------ > From: ricardost...@bol.com.br > To: saopaulo...@mail.pm.org > Date: Tue, 21 May 2013 14:57:08 -0300 > > Subject: Re: [SP-pm] DBI:mysql erro na conexão > > Marcio, deixa eu ver se entendi. > > se voce conctar localmente voce acessa, tipo host=127.0.0.1, se tentar se > conctar remotamente não da host=192.168.0.x > > Esse é o problema ? > > Ricardo Stock > www.stocksistemas.com.br > > ----- Original Message ----- > *From:* Marcio Souza <marcio_run...@hotmail.com> > *To:* saopaulo...@mail.pm.org > *Sent:* Tuesday, May 21, 2013 11:57 AM > *Subject:* Re: [SP-pm] DBI:mysql erro na conexão > > Ola, Grupo. > > > 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. > > Obs: se acesso a maquina do IP abaixo localmente, trocando o ip por > localhost, consigo normalmente fazer a conexão e extrair os dados. > > > #!/usr/bin/perl > > use strict; > use DBI; > > my $dbh = DBI->connect( > "dbi:mysql:dbname=mydb;host=192.168.0.107", > "usuario", > "senha", > { RaiseError => 1 }, > ) or die $DBI::errstr; > > my $sth = $dbh->prepare("SELECT VERSION()"); > $sth->execute(); > > my $ver = $sth->fetch(); > > print @$ver; > print "\n"; > > $sth->finish(); > $dbh->disconnect(); > > > Date: Tue, 21 May 2013 10:56:54 -0300 > > From: an...@andrewalker.net > > To: saopaulo...@mail.pm.org > > Subject: Re: [SP-pm] DBI:mysql erro na conexão > > > > On Tue, May 21, 2013 at 10:31:57AM -0300, Ricardo Stock wrote: > > > Executa este comando no mysql para liberar o acesso GRANT ALL > PRIVILEGES ON > > > *.* TO usuario@'%' IDENTIFIED BY 'senha de acesso' WITH GRANT OPTION; > > > > *medo* > > > > > > =begin disclaimer > > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > > SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org > > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > > =end disclaimer > > ------------------------------ > > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > =end disclaimer > > > =begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/SaoPaulo-pm > mailing list: > SaoPaulo-pm@pm.org L =end disclaimer > > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > =end disclaimer > > > > =begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/SaoPaulo-pm > mailing list: > SaoPaulo-pm@pm.org L =end disclaimer > > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > =end disclaimer > >
=begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> =end disclaimer