Test Foro de elhacker.net SMF 2.1

Programación => Scripting => Mensaje iniciado por: BigBear en 11 Octubre 2011, 18:10 PM

Título: [Perl] Funcion savefile()
Publicado por: BigBear en 11 Octubre 2011, 18:10 PM
Hola , con esta funcion podran crear un archivo y escribir en el , Si el archivo ya existe solo escribe y no lo borra


Código (perl) [Seleccionar]
#By Doddy H
sub savefile {
open (SAVE,">>".$_[0]);
print SAVE $_[1];
close SAVE;
}



Ejemplo de uso


Código (perl) [Seleccionar]
savefile("C:\\Windows\\Logs\\file.txt","hola")