¿Cómo abrir un archivo txt con perl y modificarlo para sobrescribir el archivo original?
$file="name.txt";
abre ARCHIVO, ">$file" o advierte "no se puede abrir el archivo";
##Abre el archivo como escritura sobrescribe el original, proceda con precaución
@new=qw/how are you/;; ##array new contiene sus nuevos datos
print FILE @new;
La ##matriz nueva contiene sus nuevos datos.## la matriz nueva contiene sus nuevos datos
Imprimir ARCHIVO @new;
Cerrar ARCHIVO;