<html><head><meta http-equiv="Content-Type" content="text/html charset=iso-8859-1"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><br></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>Tente isso.</div><div><br></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>sub utf8_to_iso {</div><div> use Encode;</div><div> my ($string) = @_;</div><div> eval {</div><div> $string = decode('utf8', $string, Encode::FB_CROAK);</div><div> $string = encode('iso-8859-1', $string)</div><div> };</div><div> return $string;</div><div> }</div><div><br></div><br><div><div>Em 03/10/2013, às 08:29, "Ricardo Stock" <<a href="mailto:ricardostock@bol.com.br">ricardostock@bol.com.br</a>> escreveu:</div><br class="Apple-interchange-newline"><blockquote type="cite">
<div dir="ltr">
<div dir="ltr">
<div style="font-family: Verdana; font-size: 10pt; ">
<div> Bom dia a todos.</div>
<div> </div>
<div> Pessoal estou tentando utilizar o modulo Encode
para a conversão de utf8 para iso, porem não estou conseguindo, segue
trecho do codigo.</div>
<div> </div>
<div>sub Converte {</div>
<div> use Encode;</div>
<div> my $string=undef;</div>
<div> ($string)=@_;</div>
<div> $string= decode_qp($string);</div>
<div> $string=encode('iso-8859-1', $string);</div>
<div> </div>
<div> return $string;</div>
<div>}</div>
<div> </div>
<div> </div>
<div>porem continua e imprimir em utf8.</div>
<div> </div>
<div>Qlguma dica.</div>
<div> </div>
<div>Obrigado</div>
<div> </div>
<div style="font-family: Verdana; font-size: 10pt; ">Ricardo
Stock<br><a href="http://www.stocksistemas.com.br">http://www.stocksistemas.com.br</a></div></div></div></div>
=begin disclaimer<br> Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/">http://sao-paulo.pm.org/</a><br> SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br> L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>=end disclaimer<br></blockquote></div><br></body></html>