sem saber como roda em Perl, deve ser preciso um decode/encode do proprio texto, antes de escrever para o arquivo.<div><br></div><div>0le<br>-- <br>                                            /////<br>                                         ( O O )<br>
=================oOO==(_)==OOo=================<br>             A tese mais simples, quais sempre sera o certo<br>                         Economia de Pensamento<br>                                 .oooO   Oooo.<br>==================(     )=(     )=====================<br>
                                     \  (     )  /<br>                                      \_)   (_/<br>===============================================<br>                        Ole Peter Smith, IME, UFG<br>    <a href="http://www.mat.ufg.br/docentes/olepeter" target="_blank">http://www.mat.ufg.br/docentes/olepeter</a> - ole at <a href="http://mat.ufg.br" target="_blank">mat.ufg.br</a><br>
===============================================<br>                   Life sure is a Mystery to be Lived<br>                      Not a Problem to be Solved<br>===============================================<br>
</div>