Perl - imprimir a un archivo
Iniciado por
Gabriel Estrada
, jul 01 2014 23:09
AUTOR PREGUNTA #1
Publicado 01 julio 2014 - 23:09
Tengo el siguiente código en perl, que me imprime por pantalla de manera normal:
Me gustaría saber como puedo usar algo similar para imprimir a un archivo, gracias de antemano.
#!/usr/bin/perl
@miListaNombres = ('uno', 'dos', 'tres' , 'A' , 'B' , 'C' , 'D' , 'E');
foreach (@miListaNombres) { print "$_\n"; }
Me gustaría saber como puedo usar algo similar para imprimir a un archivo, gracias de antemano.
-
¿Tienes la misma pregunta? Yo también
Esto también te interesa!
PREGUNTAS SIMILARES
#2
Publicado 02 julio 2014 - 04:39
debes utilizar la palabra reservada OUT para ello.
#3
Publicado 02 julio 2014 - 04:40
Te dejo como sería en base a tu código:
@miListaNombres = ('uno', 'dos', 'tres' , 'A' , 'B' , 'C' , 'D' , 'E');
open(OUT,">","/var/tmp/archivo") or die "No se pudo abrir archivo: $!";
foreach (@miListaNombres) { print OUT "$_\n"; } close(OUT);
#4
Publicado 02 julio 2014 - 04:41
Tambien puedes ejecutar el script y redireccionar el output a un archivo:
$ ./miscript.pl > /var/tmp/archivo
AUTOR PREGUNTA #5
Publicado 02 julio 2014 - 05:09
Gracias por la respuesta y las opciones 
