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

Responder a