¿Me podrían decir qué me falta o sobra en este programa? Porque no se ejecuta... Además el archivo le tengo en la misma carpeta que el que contiene el código y no sé si lo encontrará o tengo que especificar dónde está el archivo que quiero abrir... En ese caso, ¿cómo se haría?
Muchas gracias.
my ($file1, $file2, $line);
my $file1 = "TEXTO1.txt";
my $file2 = "pruebafin.txt";
open (SOURCE, $file1) or die "cannot open file ...
News of Foro - Perl en Español