<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'>Sim, Bablos.<div><br></div><div><br></div><div>    Justamente o erro e meu por ainda misturar os conceitos de uma linguagem com outra, mas o PERL me surpreendeu de todas as formas pelo estabilidade e a portabilidade do código, espero chegar no meu objetivo que é traduzir o meu projeto em C++ para PERL na interface WEB.</div><div><br></div><div>Ola, Renato </div><div><br></div><div><br></div><div>    Sim, as minhas informações vem do banco de dados só que estão criptografadas, logo na tradução vou colocar está função para verificar e já alterar os conteúdos para não acontecer mais isso.</div><div><br></div><div><br></div><div><br>Ola, Tiago.</div><div><br></div><div>    Não copiei, na verdade estou fazendo o meu 1o. programa em PERL, claro que estou aproveitando ideias e rotinas de outras fontes, mas a opção do debug realmente me passou desapercebido, logo tudo isso que aconteceu me deu muita informação, espero mesmo contar com o apoio de todos neste inicio de trabalho.</div><div><br></div><div><br></div><div>Grato mais uma vez a todos pelo tempo empenhado comigo, espero retribuir no futuro quando puder ajudar com a experiência adquirida.</div><div><br></div><div><br></div><br><div><hr id="stopSpelling">From: renato.cron@gmail.com<br>Date: Tue, 21 May 2013 16:31:58 -0300<br>To: saopaulo-pm@mail.pm.org<br>Subject: Re: [SP-pm] DBI:mysql erro na conexão<br><br><div dir="ltr">a unica coisa que achei estranho é,<div><br></div><div>sua senha deve ser algo como @<b>#</b> onde <b># é um número</b> pois se não, o "use stricts" teria avisado você, provavelmente que a variavel @foorestodasuasenha não existe.</div>

<div><br></div><div>portanto, não entendi como você criaria uma função para evitar isso.</div><div><br></div><div>se você estiver lendo a senha de um arquivo, por exemplo, você não precisa tratar nada! o @, assim como %, só é trocado nas strings entre ", as ' ou q{} (que é um ' com outro caractere) assim como o qq "é" o " </div>

</div><div class="ecxgmail_extra"><br><br><div class="ecxgmail_quote">2013/5/21 Blabos de Blebe <span dir="ltr"><<a href="mailto:blabos@gmail.com" target="_blank">blabos@gmail.com</a>></span><br><blockquote class="ecxgmail_quote" style="border-left:1px #ccc solid;padding-left:1ex;">

<div dir="ltr">Não cara,<div><br></div><div>De acordo com o que você reportou, o DBI->connect funcionou perfeitamente conforme especificado e não te enganou.<div><br></div><div>*Você* é que deixou passar que aspas duplas permitem interpolação de variáveis ao passo que aspas simples não permitem.</div>



</div><div><br></div><div>Isso é um deslize comum, dentre vários outros, quando se está começando com o Perl.</div><div><br></div><div>Não se preocupe, todo mundo passa por isso e estamos aqui pra dar o maior apoio.</div>



<div><br></div><div>Só cuidado pra não "culpar o culpado errado" :)</div><div><br></div><div>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.</div>



<div><br></div><div>[]'s</div><div><br></div><div><br></div></div><div class="ecxHOEnZb"><div class="h5"><div class="ecxgmail_extra"><br><br><div class="ecxgmail_quote">2013/5/21 Marcio Souza <span dir="ltr"><<a href="mailto:marcio_runner@hotmail.com" target="_blank">marcio_runner@hotmail.com</a>></span><br>



<blockquote class="ecxgmail_quote" style="border-left:1px #ccc solid;padding-left:1ex;">


<div><div dir="ltr">   Sim, Blabos.<div><br></div><div><br></div><div><br></div><div>    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.<br>



<br><div><hr>From: <a href="mailto:blabos@gmail.com" target="_blank">blabos@gmail.com</a><br>Date: Tue, 21 May 2013 15:27:04 -0300<div><div><br>To: <a href="mailto:saopaulo-pm@mail.pm.org" target="_blank">saopaulo-pm@mail.pm.org</a><br>



Subject: Re: [SP-pm] DBI:mysql erro na conexão<br><br><div dir="ltr">Opa,<div><br></div><div>Ao invés de "blablabla\@blebleble"</div><div><br></div><div>Experimenta 'blablabla@blebleble'</div><div><br></div>



<div>ou ainda q{blablabla@blebleble}</div>

</div><div><br><br><div>2013/5/21 Marcio Souza <span dir="ltr"><<a href="mailto:marcio_runner@hotmail.com" target="_blank">marcio_runner@hotmail.com</a>></span><br><blockquote style="border-left:1px #ccc solid;padding-left:1ex;">








<div><div dir="ltr">Ola, Ricardo.<div><br></div><div><span style="font-size:12pt;">     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.</span></div>





<div><br></div><div><br></div><div>     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.</div>





<div><br></div><div>     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 "\@".</div>





<div><br></div><div>    Mil desculpas novamente, mas realmente vou ter que penar muito ainda para pensar em PERL, pois faz anos que programo em C++.</div><div><br></div><div><br></div><div>    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.</div>





<div><br></div><div>    Grato a todos ...</div><div><br></div><div><br></div><div><br></div><div>    Marcio Souza</div><div><br><br><div><hr>From: <a href="mailto:ricardostock@bol.com.br" target="_blank">ricardostock@bol.com.br</a><br>





To: <a href="mailto:saopaulo-pm@mail.pm.org" target="_blank">saopaulo-pm@mail.pm.org</a><br>Date: Tue, 21 May 2013 14:57:08 -0300<div><div><br>Subject: Re: [SP-pm] DBI:mysql erro na conexão<br><br>






<div><font face="Arial">Marcio, deixa eu ver se entendi.</font></div>
<div><font face="Arial"></font> </div>
<div><font face="Arial">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</font></div>
<div><font face="Arial"></font> </div>
<div><font face="Arial">Esse é o problema ?</font></div>
<div> </div>
<div>Ricardo Stock<br><a href="http://www.stocksistemas.com.br" target="_blank">www.stocksistemas.com.br</a></div>
<blockquote style="BORDER-LEFT:#000000 2px solid;PADDING-LEFT:5px;PADDING-RIGHT:0px;MARGIN-LEFT:5px;MARGIN-RIGHT:0px;">
  <div style="FONT:10pt arial;">----- Original Message ----- </div>
  <div style="FONT:10pt arial;BACKGROUND:#e4e4e4;"><b>From:</b> 
  <a title="marcio_runner@hotmail.com" href="mailto:marcio_runner@hotmail.com" target="_blank">Marcio Souza</a> </div>
  <div style="FONT:10pt arial;"><b>To:</b> <a title="saopaulo-pm@mail.pm.org" href="mailto:saopaulo-pm@mail.pm.org" target="_blank">saopaulo-pm@mail.pm.org</a> </div>
  <div style="FONT:10pt arial;"><b>Sent:</b> Tuesday, May 21, 2013 11:57 
AM</div>
  <div style="FONT:10pt arial;"><b>Subject:</b> Re: [SP-pm] DBI:mysql erro na 
  conexão</div>
  <div><br></div>
  <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: 
  <a href="mailto:andre@andrewalker.net" target="_blank">andre@andrewalker.net</a><br>> To: <a href="mailto:saopaulo-pm@mail.pm.org" target="_blank">saopaulo-pm@mail.pm.org</a><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: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>> SaoPaulo-pm mailing list: 
  <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>> 
  L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>> =end 
  disclaimer<br></div></div></div>
  
  <br><hr>

  <br>=begin disclaimer<br>   Sao Paulo Perl Mongers: 
  <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br> SaoPaulo-pm mailing list: 
  <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br> L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>=end 
  disclaimer<br></blockquote>
<br></div></div>=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a>
 L
=end disclaimer</div></div>                                           </div></div>
<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br></div>
<br>=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a>
 L
=end disclaimer</div></div></div></div>                                           </div></div>
<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br></div>
</div></div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div><span style="color:rgb(51,51,51);font-size:x-small;">Saravá,</span></div><div><span style="color:rgb(51,51,51);font-size:x-small;">Renato CRON</span></div>

<div><div style="text-align:right;"><font size="1" color="#333333"><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a></font></div></div><div style="text-align:right;"><font size="1" color="#333333"><a href="http://twitter.com/#%21/renato_cron" target="_blank">@renato_cron</a></font></div>


</div>
<br>=begin disclaimer
   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
 SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
 L
=end disclaimer</div>                                       </div></body>
</html>