Como não gosto de ter informar o path da aplicação dentro da mesma (dificulta portabilidade, posso até perder desempenho, mas...), costumo fazer<br><br>BEGIN {<br>&nbsp;&nbsp;&nbsp; use File::Basename qw(dirname);<br>&nbsp;&nbsp;&nbsp; use Cwd qw(realpath);<br>
&nbsp;&nbsp;&nbsp; push(@INC, dirname(realpath($0)));<br>}<br><br><br><div class="gmail_quote">2008/3/13 Nélio Nunes &lt;<a href="mailto:nelio.nunes@sapo.pt">nelio.nunes@sapo.pt</a>&gt;:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div style="">Outra alternativa seria indicar ao perl qual o caminho para os seus módulos:<div><br></div><div>use lib &quot;/scripts&quot;;</div><div><br><div> <span style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-indent: 0px; text-transform: none; white-space: normal; word-spacing: 0px;"><div style="">
<div><div><div>[]&#39;s</div><div><br></div><div>Nélio Nunes</div><div><a href="mailto:nelio.nunes@sapo.pt" target="_blank">nelio.nunes@sapo.pt</a></div><br></div></div><br></div></span><br> </div><br><div><div><div></div>
<div class="Wj3C7c"><div>On Mar 13, 2008, at 5:40 PM, Daniel &reg; Antunes wrote:</div><br></div></div><blockquote type="cite"><span style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-indent: 0px; text-transform: none; white-space: normal; word-spacing: 0px;"><div>
<div><div></div><div class="Wj3C7c"><div style="margin: 0px; font-size: 12pt;">Uma maneira é informar no #!/usr/bin/perl o caminho da sua aplicação assim :<br><br>#!/usr/bin/perl -I/scripts<br><br><div style="margin: 0px;">
&nbsp;</div>Daniel &reg; Antunes<br><i><font color="#007f40">profissional de informática</font></i><br><i><font color="#007f40"></font></i><i><font color="#007f40">gnu/linux user</font></i><span>&nbsp;</span>#238553<div style="margin: 0px; font-size: 12pt;">
<br><br><div style="margin: 0px; font-size: 12pt;">----- Mensagem original ----<br>De: Marcelo Bom Jardim Villasanin &lt;<a href="mailto:jesmarcelo@hotmail.com" target="_blank">jesmarcelo@hotmail.com</a>&gt;<br>Para: Cascavel Perl Mongers &lt;<a href="mailto:cascavel-pm@pm.org" target="_blank">cascavel-pm@pm.org</a>&gt;<br>
Enviadas: Quinta-feira, 13 de Março de 2008 14:31:50<br>Assunto: Re: [Cascavel-pm] Utilizando packages<br><br><div style="margin: 0px; text-align: left;">A parte do codigo é está:<br><br>#!/usr/bin/perl<br>use limpeza;<br>
my $limpeza = new Limpeza();<br><br><br>Quando tento executar a partir do mesmo diretório funciona:<br><br>perl limpeza.pl -&gt; funciona<br><br>Quando tento executar a partir de outro diretório não funciona:<br><br>perl /scripts/limpeza.pl -&gt; não funciona<br>
</div><br>apresenta o seguinte erro:<br><br>Can&#39;t locate <a href="http://limpeza.pm" target="_blank">limpeza.pm</a> in @INC (@INC contains: /usr/lib/perl5/5.8.3/i586-linux-thread-multi /usr/lib/perl5/5.8.3 /usr/lib/perl5/site_perl/5.8.3/i586-linux-thread-multi /usr/lib/perl5/site_perl/5.8.3 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.3/i586-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.3 /usr/lib/perl5/vendor_perl .) at /scripts/limpeza.pl line 3.<br>
BEGIN failed--compilation aborted at /scripts/limpeza.pl line 3.<br><br><br><br><br><br><hr>&gt; Date: Thu, 13 Mar 2008 14:25:41 -0300<br>&gt; From:<span>&nbsp;</span><a href="mailto:gabriel.vieira@gmail.com" target="_blank">gabriel.vieira@gmail.com</a><br>
&gt; To:<span>&nbsp;</span><a href="mailto:cascavel-pm@pm.org" target="_blank">cascavel-pm@pm.org</a><br>&gt; Subject: Re: [Cascavel-pm] Utilizando packages<br>&gt;<span>&nbsp;</span><br>&gt; Poste o código de como você faz a requisição.<br>
&gt;<span>&nbsp;</span><br>&gt; 2008/3/13 Marcelo Bom Jardim Villasanin &lt;<a href="mailto:jesmarcelo@hotmail.com" target="_blank">jesmarcelo@hotmail.com</a>&gt;:<br>&gt; &gt;<br>&gt; &gt; Fala pessoal,<br>&gt; &gt;<br>&gt; &gt; Criei um package e estou chamando o mesmo da seguinte forma:<br>
&gt; &gt;<br>&gt; &gt; use limpeza;<br>&gt; &gt;<br>&gt; &gt; está funcionando normalmente porém quando tento executar o script a partir<br>&gt; &gt; de outro diretorio ele não acha o package, como posso corrigir isto ?<br>
&gt; &gt;<br>&gt; &gt; Abs,<br>&gt; &gt; Marcelo Bom Jardim<br>&gt; &gt;<br>&gt; &gt; _______________________________________________<br>&gt; &gt; Cascavel-pm mailing list<br>&gt; &gt;<span>&nbsp;</span><a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<span>&gt; &gt;<span>&nbsp;</span><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a></span><br>&gt; &gt;<br>&gt;<span>&nbsp;</span><br>&gt;<span>&nbsp;</span><br>
&gt;<span>&nbsp;</span><br>&gt; --<span>&nbsp;</span><br>&gt; Gabriel Vieira<br>&gt; _______________________________________________<br>&gt; Cascavel-pm mailing list<br>&gt;<span>&nbsp;</span><a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<span>&gt;<span>&nbsp;</span><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a></span><br><div style="margin: 0px;"><br><br>-----Anexo incorporado-----<br>
<br>_______________________________________________<br>Cascavel-pm mailing list<br><a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a></div>
</div><br></div></div><br><hr size="1"></div></div>Abra sua conta no<span>&nbsp;</span><a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.mail.yahoo.com/" target="_blank">Yahoo! Mail</a>, o único sem limite de espaço para armazenamento!<span>&nbsp;</span>_______________________________________________<div class="Ih2E3d">
<br>Cascavel-pm mailing list<br><a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a></div>
</div></span></blockquote></div><br></div></div><br>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br>