<p dir="ltr">FindBin? </p>
<div class="gmail_quote">Em 24/02/2014 03:58, "Samir Cury" <<a href="mailto:samircurys@gmail.com">samircurys@gmail.com</a>> escreveu:<br type="attribution"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr"><div><div>E ai pessoal, faz um tempo que nao passo por aqui, mas felizmente estou voltando a usar Perl no cotidiano e me livrando da ferrugem.<br><br>Estava revisando um modulo que falta pouco para subir pro CPAN, e me deparei com uma coisa que  nao me pareceu o melhor jeito de se fazer :<br>

<br><a href="https://github.com/samircury/HTCondor--Queue--Parser/blob/master/t/01_basic.pl#L11" target="_blank">https://github.com/samircury/HTCondor--Queue--Parser/blob/master/t/01_basic.pl#L11</a><br><br></div>Penso isso pois uma vez enquanto escrevia testes em Python me falaram de uma variavel que referenciava o diretorio de testes. Imaginei que pudesse existir um equivalente em Perl mas minhas buscas nao retornaram nada especifico.<br>

<br></div><div>Achei interessante perguntar aqui na lista se conhecem algum jeito melhor. De repente esta na ponta da lingua de quem escreve modulos direto. Do jeito que esta ja passa no "prove" [1] mas como nao tenho muita pratica com modulos e sempre bom perguntar.<br>

<br></div><div>Abracos,<br></div><div>Samir<br><br>[1] : <br><br>  ~/code/Condor--Queue--Parser $ prove -l t/<a href="http://01_basic.pl" target="_blank">01_basic.pl</a> <br>t/<a href="http://01_basic.pl" target="_blank">01_basic.pl</a> .. ok   <br>
All tests successful.<br>
Files=1, Tests=9,  2 wallclock secs ( 0.03 usr  0.00 sys +  1.27 cusr  0.03 csys =  1.33 CPU)<br>Result: PASS<br></div></div>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div>