Breno, eu até poderia fazer o resumo, mas não seria melhor se alguém q não bebe<br>fizesse o resumão? Fora q vc escreve MUITO melhor q eu, e vc é o &quot;resumador oficial&quot;...<br>Faz esse favor p/ agente?<br><br><div class="gmail_quote">
2009/3/14 breno <span dir="ltr">&lt;<a href="mailto:breno@rio.pm.org">breno@rio.pm.org</a>&gt;</span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
2009/3/13 Alex Santos &lt;<a href="mailto:alexsantose@yahoo.com.br">alexsantose@yahoo.com.br</a>&gt;:<br>
<div class="im">&gt; Opa rapaz. Eu de novo. =p<br>
&gt;<br>
&gt; Tipo... eu estava querendo fazer algo semelhante ao &quot;set -x&quot; do shell, só<br>
&gt; que além de mostrar os erros ocorrendo no programa principal (index.cgi),<br>
&gt; mostrasse os erros no sub-programa (net-lib.pl).<br>
&gt;<br>
&gt; Que o erro ocorre ali eu sei, mas eu quero ver em que ponto do sub-programa<br>
&gt; que é chamado no net-lib..pl ocorre uma exceção: Se há problema ao passar o<br>
&gt; parâmetro, se ele procura algum outro arquivo que não se encontra no mesmo<br>
&gt; diretório, etc.<br>
&gt;<br>
&gt; Até porquê assim, eu leio as mensagens de erros e resolvo aos poucos e não<br>
&gt; perturbo vocês. XD<br>
&gt;<br>
<br>
</div>Bom, confesso que não entendi exatamente o seu problema... mas,<br>
falando em &quot;confess&quot;, pra saber (normalmente) em que ponto ocorreu uma<br>
exceção do ponto de vista de quem chamou, usa-se o módulo Carp[1].<br>
Para ver todo o &quot;stack trace&quot; do problema automagicamente, sem<br>
precisar modificar nada no programa, vc pode usar o ótimo módulo<br>
Carp::Always[2], do Adriano Ferreira, uma resposta ao também<br>
interessante Devel::SimpleTrace[3].<br>
<br>
    perl -MCarp::Always seu_script.pl<br>
<br>
ou, se seu programa for executado de outras formas, adicione:<br>
<br>
    use Carp::Always;<br>
<br>
no início dele e pronto.<br>
<div class="im"><br>
&gt; Em tempo: E como foi o encontro galera? Acaba que surgiram uns imprevistos e<br>
&gt; não pude comparecer. =)<br>
&gt;<br>
<br>
</div>Foi *muito* bom. Perdeu :-)<br>
<br>
Mas ainda estou esperando um resumo do líder.<br>
<br>
[]s<br>
<br>
-b<br>
<br>
<br>
1. <a href="http://search.cpan.org/perldoc?Carp" target="_blank">http://search.cpan.org/perldoc?Carp</a><br>
2. <a href="http://search.cpan.org/perldoc?Carp::Always" target="_blank">http://search.cpan.org/perldoc?Carp::Always</a><br>
3. <a href="http://search.cpan.org/perldoc?Devel::SimpleTrace" target="_blank">http://search.cpan.org/perldoc?Devel::SimpleTrace</a><br>
<div><div></div><div class="h5">_______________________________________________<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>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Just another Perl Hacker,<br>Fernando (SmokeMachine)<br><a href="http://perl-e.org">http://perl-e.org</a><br>