Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
#!/bin/env perl
use strict;
use warnings;
use open qw( :encoding(UTF-8) :std ); # Make UTF-8 default encoding
use IO::Uncompress::Gunzip;
my $fh_in = IO::Uncompress::Gunzip->new("hello.txt.gz");
my $line = readline $fh_in;
print $line;
Configuración de la codificación predeterminada para IO
# encode/decode UTF-8 for files and standard input/output
use open qw( :encoding(UTF-8) :std );
Este pragma cambia el modo predeterminado de lectura y escritura de texto (archivos, entrada
estándar, salida estándar y error estándar) a UTF-8, que suele ser lo que desea al escribir nuevas
aplicaciones.
ASCII es un subconjunto de UTF-8, por lo que no se espera que cause ningún problema con los
archivos ASCII heredados y le ayudará a protegerse contra la corrupción accidental de archivos
que puede ocurrir cuando se tratan archivos UTF-8 como ASCII.
Sin embargo, es importante que sepa cuál es la codificación de sus archivos con los que está
tratando y los maneje en consecuencia. ( Razones por las que no debemos ignorar Unicode ) .
Para un tratamiento más profundo de Unicode, consulte el tema Perl Unicode .
Lea Archivo I / O (lectura y escritura de archivos) en línea:
https://riptutorial.com/es/perl/topic/1604/archivo-i---o--lectura-y-escritura-de-archivoshttps://riptutorial.com/es/home
19