Perl – How to Read a Text File into a Variable – 6 ways to do it
6 façons de lire un fichier texte dans une variable Si vous travaillez avec des fichiers volumineux, vous pourriez envisager d’utiliser File::Slurp. Il est bien plus rapide que la méthode conventionnelle : { local $/=undef; open FILE, "myfile" or die "Couldn't open file: $!"; binmode FILE; $string = <FILE>; close FILE; } { local $/=undef; open FILE, "myfile" or die "Couldn't open file: $!"; $string = <FILE>; close FILE; } open FILE, "myfile" or die "Couldn't open file: $!"; $string = join("", <FILE>); close FILE; open FILE, "myfile" or die "Couldn't open file: $!"; while (<FILE>) { $string .= $_; } close FILE; open( FH, "sample.txt") || die("Error: $!\n"); read(FH, $data, 2000); close FH; Le format de la fonction read est : ...