Bom dia a todos.
Pessoal estou tentando utilizar o modulo Encode para a conversão de utf8
para iso, porem não estou conseguindo, segue trecho do codigo.
sub Converte {
use Encode;
my $string=undef;
($string)=@_;
$string= decode_qp($string);
$string=encode('iso-8859-1', $string);
return $string;
}
porem continua e imprimir em utf8.
Qlguma dica.
Obrigado
Ricardo Stock
http://www.stocksistemas.com.br=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer