Cómo convertir caracteres especiales a UTF-8?

Question

Cuando extraigo datos de una base de datos MySQL, algunos de los resultados tienen caracteres especiales, cuando se abren, p. Ej. emacs decodifica a \240 y \346.

Cuando se muestra en un terminal de UTF-8, los caracteres especiales se muestra como �

Así que la codificación utilizada costuras de usar sólo 1 byte por carácter.

Puedo, por ejemplo, vea que \346 debe ser æ.

Pregunta

¿El Perl tienen un módulo que puede codificar estos caracteres especiales a UTF-8?

Answer 1

Usa Encode::decode para decodificar tus datos desde cualquier codificación en el formato interno de Perl.

Luego, al escribir los datos en un archivo, configure la capa 'utf8' para que los datos se escriban en UTF-8.

use Encode; 

my $data_from_database = ...; 

my $perl_data = decode('ISO-8859-1', $data_from_database); 

binmode STDOUT, ':utf8'; 

print $perl_data;