HTMLpointHTMLpoint HTMLpoint.com


 F.A.Q. su PERL


18. ¿Es posible incluir texto al final del archivo?


Por supuesto, también este tipo de escritura (llamada "in append") resulta posible. Partiendo del código ofrecido antes, las modificaciones son:

# Abre el archivo directamente en append
open (FILE, ">> file.txt");
#Escribe
print FILE "Lo que queráis.\n";
# Cierra el archivo
close FILE;


Como veis, será suficiente añadir un ulterior ">" para indicar que los nuevos datos tienen que incluirse al final del archivo.

Si, sin embargo, tenéis que escribir en un archivo que no sabéis si está vacío o no, bastará escribir:

if (-e file.txt) {
open (FILE, ">> file.txt");
} else {
open (FILE, "> file.txt");
}
print FILE "Lo que queráis\n";
close FILE;


si bien abrirlo directamente con ">>", incluso si éste existe, no es un error.

[ Índice ]     [ Siguiente ]
  Vuelve a principio de página