Tengo un script en Perl, la verdad es bastante extenso y no entiendo mucho código del que contiene, así que no me atrevo a aventurarme a modificarlo para que ese script me ponga en un archivo txt los resultados.
Me explico, tengo un script llamado, programa.pl y otro llamado generador.pl.
El programa.pl acepta argumentos de la consola, por ejemplo:
- Código: Seleccionar todo
programa.pl 5
programa.pl 12
programa.pl 25
Yo escribí un par de líneas usando la función system():
Using perl Syntax Highlighting
for my $i ( 0 .. 10 ) {
system("perl programa.pl $i");
}
system("perl programa.pl $i");
}
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
Entonces ya se ejecuta solo 10 veces. El problema es que programa.pl me muestra el resultado en pantalla y yo quería saber si era posible capturar lo que va saliendo y almacenarlo en un txt.
Estaba la opción de:
Using perl Syntax Highlighting
for my $i ( 0 .. 10 ) {
system("perl programa.pl $i >>resultado.txt");
}
system("perl programa.pl $i >>resultado.txt");
}
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Pero eso no me va mostrando en pantalla como va avanzando el programa... solo puedo saber si hubo algún error hasta que termina y el proceso y veo el txt.
Gracias de antemano como siempre.
Y feliz navidad
