Texto :: CSV :: codificado Clasificación y resumen
- Licencia:
- Perl Artistic License
- Nombre del editor:
- Makamaka Hannyaharamitu
- Sitio web del editor:
- http://search.cpan.org/~makamaka/
Texto :: CSV :: codificado Etiquetas
Texto :: CSV :: codificado Descripción
Codificación Aware Text :: CSV Texto :: CSV :: codificado es un módulo PERL que hereda el texto :: CSV y está al tanto de las codificaciones de entrada / salida.Synopsis # aquí en Perl 5.8 o más tarde $ CSV = Texto :: CSV :: codificado-> nuevo ({coding_in => "ISO-8859-1", # la codificación viene en Perl coding_out => "CP1252", # la codificación sale de Perl}); # analizar CSV es considerado como entrada $ csv-> analizar (línea de línea); # $ línea es una cadena codificada ISO-8859-1 @columns = $ csv-> campos (); # Son los datos de Unicode # La lista de combinación se considera como salida $ csv-> combinar (@columns); # son datos unicode $ línea = $ csv-> cadena (); # $ la línea es una cadena codificada CP1252 # si desea que se devuelvan @columns que se codificarán en $ Coding # o desee para combinar @columns que se asumirán en $ codificando $ csv-> codificación ($ codificación); # Cambiar las codificaciones de entrada / salida $ CSV-> Encoding_in ('ShiftJis') -> Encoding_Out ('UTF8'); $ csv-> EOL ("\ n"); abrir (MIS $ EN, "SJIS.CSV"); abrir (MIS $ OUT, "OUTPUT.CSV"); # Cambie una codificación de Shiftjis a UTF8 mientras (MIS $ COLUMS = $ CSV-> Getline ($ IN)) {$ CSV-> Imprimir ($ OUT, $ columnas); } cierre ($ en); cerrar ($ fuera); # accesos directos simples # (independientemente de la codificación_in / out y codificación) $ uni_columns = $ csv-> decodificar ('euc-jp', $ línea); # euc-jp => unicode $ line = $ csv-> codificación ('euc-jp', $ uni_columns); # Unicode => Requisitos de EUC-JP: · Perl
Texto :: CSV :: codificado Software relacionado