o head do &#39;Mail&#39; só informa as informações do header da mensagens e não os header dos MIME ;) !<br><br>Solli M. Honório<br><br><div class="gmail_quote">2008/6/10 Luis Motta Campos &lt;<a href="mailto:luismottacampos@yahoo.co.uk">luismottacampos@yahoo.co.uk</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 class="Ih2E3d">Edilson Azevedo wrote:<br>
&gt; Caramba!<br>
&gt; Quantas respostas em tão pouco tempo! Fiquei impressionado!<br>
<br>
</div>Sobre a quantidade de respostas: apenas eu e o Solli te respondemos...<br>
eu não sei do que você está falando. ;)<br>
<br>
Eu não li o teu programa inteiro, mas, pelo que você me disse que quer,<br>
acho que basta usar Mail::Internet (MIME Parsing pelo Email::MIME ainda<br>
está em estágio alfa, eu não recomendo usar em produção):<br>
<br>
perl -MMail::Internet -le &#39;print Mail::Internet-&gt;new( \*STDIN<br>
)-&gt;head-&gt;as_string()&#39;<br>
<br>
Esta linha imprime os headers do seu email. Você pode manipular e<br>
inspecionar os headers individualmente usando o objeto Mail::Header,<br>
retornado pelo método Mail::Internet::head().<br>
<br>
Eu vou olhar isso com calma depois do jantar e te digo mais alguma coisa<br>
a respeito.<br>
<div class="Ih2E3d"><br>
Putamplexos.<br>
--<br>
Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,<br>
Perl fanatic evangelist, and amateur {cook, photographer}<br>
_______________________________________________<br>
</div><div><div></div><div class="Wj3C7c">SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
<br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>&quot;o animal satisfeito dorme&quot;. - Guimarães Rosa