File-Handling

Perl – Cómo leer un archivo de texto en una variable – 6 formas de hacerlo

15 marzo 2010

Perl, File-Handling, Tutorial, Code-Snippet

6 formas de leer un archivo de texto en una variable

Si está trabajando con archivos grandes, podría considerar usar File::Slurp. Es mucho más rápido que el convencional:

{
  local $/=undef;
  open FILE, "myfile" or die "Couldn't open file: $!";
  binmode FILE;
  $string = &lt;FILE>;
  close FILE;
}

{
  local $/=undef;
  open FILE, "myfile" or die "Couldn't open file: $!";
  $string = &lt;FILE>;
  close FILE;
}

open FILE, "myfile" or die "Couldn't open file: $!";
$string = join("", &lt;FILE>);
close FILE;
  
open FILE, "myfile" or die "Couldn't open file: $!";
while (&lt;FILE>){
 $string .= $_;
}
close FILE;

open( FH, "sample.txt") || die("Error: $!\n");
read(FH, $data, 2000);
close FH;

El formato de la función de lectura es: