<div dir="ltr">Opa,<div><br></div><div>Junior, a forma que você sugeriu é um dialeto mais antigo. Hoje em dia (e desde a época do Perl Best Practices, pg 407), o recomendado é herdar do módulo Exporter, e utilizar o @EXPORT_OK ao invés do @EXPORT diretamente.</div>

<div><br></div><div>Eu vou ficar devendo todas as referências mas vou deixar a do MPB: <a href="http://modernperlbooks.com/books/modern_perl_2014/09-managing-perl-programs.html">http://modernperlbooks.com/books/modern_perl_2014/09-managing-perl-programs.html</a></div>

<div><br></div><div>O mais atual seria algo como:</div><div><br></div><div>package Foo;</div><div><br></div><div>use base 'Exporter'; ## Ou use parent, dependendo da versão do Perl</div><div><br></div><div>our @EXPORT_OK = qw{ func1 func2 };</div>

<div><br></div><div>sub func1 {}</div><div><br></div><div>...</div><div><br></div><div>1;</div><div><br></div><div>[]'s</div><div><br></div><div><br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">

2014-04-29 18:15 GMT-03:00 Junior Moraes <span dir="ltr"><<a href="mailto:juniiior182@gmail.com" target="_blank">juniiior182@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<div dir="ltr"><div><div class="gmail_extra">Hi.<br><br><div class="gmail_quote">Em 29 de abril de 2014 18:07, Blabos de Blebe <span dir="ltr"><<a href="mailto:blabos@gmail.com" target="_blank">blabos@gmail.com</a>></span> escreveu:<div class="">

<br>

<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">Só mais uma coisa,<div><br></div><div>Isso não tem nada a ver com Exporter.</div><div>



<br></div><div>[]'s</div></div></blockquote></div><div><br>Eu acho que ele tá perguntando mesmo como exportar uma sub e torná-la 
possível ser chamada à partir de outro script bastando dar um use no 
módulo, e não como invocar um método estaticamente como eu pensei.<br><br>Creio que o jeito mais roots seria:<br><br><i>package Modulo::Modulo;<br><br>use vars qw(@ISA @EXPORT);<br><br>@ISA    = (qw(Exporter));<br>@EXPORT = qw(acp);<br>



<br>sub acp {</i><br><i>...<br></i><div class="gmail_extra"><i>}</i><br>1;<br><br></div><div class="gmail_extra">Deste modo, Aureliano, bastará dar um <b>use</b> em Modulo::Modulo e a função acp() estará acessível, assim como no Math::Prime::Util.<br>



<br></div>[]'s<br><br></div><div class=""><div> _______________________________________________<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">


Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">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></div><br></div></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><br></div>