Para abrir una conexión se utiliza el operador open
. Por ejemplo:
if (open FILE, "alus.txt" ) { ... # Para lectura } if (open FILE, "<alus.txt" ) { ... # Para lectura } if (open FILE, ">alus.txt" ) { ... # Para escritura } if (open FILE, ">>alus.txt" ) { ... # Para añadir }
El operador open
devuelve verdadero o falso, dependiendo de
si la operación pudo realizarse con éxito o no.
Se puede usar una expresión escalar en lugar del especificador de fichero. Por ejemplo:
my $outfile = "alu.txt"; open FILE, "> $outfile";
Observe el espacio después del ``mayor que''. Asi se evitan extrañas conductas, si por ejemplo
$outfile
es algo asi como >alu.txt
, se podriá producir un append
(esto es >>
) en vez de una escritura (>
).
Casiano Rodríguez León