Foro - Perl en Español

Buen día.

Tengo la siguiente duda, en mi programa necesito que un hilo 1 se ejecute y otro hilo 2 esperé a que termine el hilo 1 pero hilo 2 imprima puntos (.) hasta que el hilo 1 termine.

Bienvenido a los foros de Perl en Español, Xer0f.

¿Con fork o threads?

Hola explorer, gracias por la bienvenida.

Lo quiero realizar con hilos, hasta ahora encontré una manera de esperar a que un hilo termine.

my $thread = threads->new(\&flash,$software_download); while($thread->is_running)
{
#imprimir Cargando . . .
}

No sé si exista una forma mejor para realizarlo. También quiero hacer que se vean varios puntos y simulando que está cargando.

Saludos.

Sí, esa es una manera, la de preguntar si tal hilo sigue funcionando.

Otras... creo que son más alambicadas (semáforos, banderas...)

El progreso (con los puntos), lo tienes sencillo:

Es necesario modificar $| para que la salida de los puntos sea inmediata, uno a uno. Si no, saldrían todos de golpe. Y el sleep() es necesario para que el bucle no se lleve toda la carga de la CPU.

Gracias, explorer, estaba realizando de otra manera la forma de imprimir los puntos pero como tú la pones es más sencilla que la mía.