<div dir="ltr"><div>olá Carneiro, </div><div><br></div>É porque a atr, é um dado que vem do chip do cartão, estou lendo o mesmo a partir de uma leitora de smartcard, e buscando as informações sobre esta atr no banco.</div><div class="gmail_extra"><br><div class="gmail_quote">Em 30 de setembro de 2015 10:09, Andre Carneiro <span dir="ltr"><<a href="mailto:andregarciacarneiro@gmail.com" target="_blank">andregarciacarneiro@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Estou tentando entender porque voce está tentando buscar pelo conteúdo de 'atr' e nao pelo conteúdo de 'name'. De qq forma, creio que voce pode tentar usar RLIKE do próprio Mysql como o Vinciguerra sugeriu(ele foi mais rápido que eu... :P). Dependendo do tamanho dessa tabela, podería-se pensar em usar FTS, embora não pareça ser o caso.<div><br><div><br></div><div><br></div><div>Atenciosamente</div></div></div><div class="gmail_extra"><br><div class="gmail_quote"><span class="">2015-09-30 8:38 GMT-03:00 Italo Gonçales <span dir="ltr"><<a href="mailto:italo.goncales@gmail.com" target="_blank">italo.goncales@gmail.com</a>></span>:<br></span><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div class="h5"><div dir="ltr">Bom dia!<div><br></div><div>Estou migrando uma aplicação java stand alone para WebService usando Catalyst e MySQL, quando me deparei com um caso atípico do meu dia a dia. A antiga base de dado ( em txt ) da aplicação java possui expressões regulares nas chaves que estou utilizando para a busca ( e que é a única que eu tenho ).</div><div><br></div><div>Gostaria de saber se há alguma maneira de buscar um valor que corresponda à regex armazenada no banco de dados?</div><div><br></div><div>Testei pelo MySQL e funcionou, mas não consigo fazer o mesmo select no perl.</div><div><br></div><div>Segue busca de exemplo:</div><div><br></div><div>mysql> SELECT * FROM card where '3B45978551FE119864' RLIKE atr;</div><div><div>+----------------------------------+----------------------------------------+</div><div>| atr | name |</div><div>+-----------------------------------+---------------------------------------+</div><div>| 3B[0-9]{4}8551FE119864 | S12-468 |</div></div><div><br></div><div>Tentei usar o search_like, search com '-rlike' e search com '-like', mas nada funcionou. Tentei inverter na query do search também, mas não deu muito certo.</div><div><br></div><div>Tentativas:</div><div>$card_rs->search({ atr => { -like => $atr } })->single;<br></div><div><br></div><div>$card_rs->search({ atr => { -rlike => $atr } })->single;<br></div><div><br></div><div>$card_rs->search({ $atr => { -rlike => atr } })->single;<br></div><div><br></div><div>Gostaria de saber se há alguma outra maneira de fazer essa busca no perl.</div><div><br></div><div>Obrigado!<span><font color="#888888"><br clear="all"><div><br></div>-- <div><div dir="ltr"><div><br></div><div>Att,</div><div><br></div><div>Italo Gonçales</div><div>Perl Developer at Morpho</div><div><a href="tel:%2B55%2012%2098134%200318" value="+5512981340318" target="_blank">+55 12 98134 0318</a></div></div></div>
</font></span></div></div>
<br></div></div><span class="">=begin disclaimer<br>
Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></span></blockquote></div><span class="HOEnZb"><font color="#888888"><br><br clear="all"><div><br></div>-- <br><div>André Garcia Carneiro<br>Software Engineer<br>(11)982907780</div>
</font></span></div>
<br>=begin disclaimer<br>
Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" rel="noreferrer" 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" rel="noreferrer" 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 class="gmail_signature"><div dir="ltr"><br><div><br></div><div>Att,</div><div><br></div><div>Italo Gonçales</div><div>Perl Developer at Morpho</div><div>+55 12 98134 0318</div></div></div>
</div>