Re: [Perl] Execución de varios script simultaneamente

[Craig Dunn]

--On 16 October 2005 16:49 +0200 Marc Franquesa <marc.franquesa en gmail.com> 
wrote:

> Tengo un trabajo cron que ejecuta 4 scripts en perl totalmente
> independientes entre
> si.
>
> Para reducir el tiempo de carga del interprete Perl para cada script
> me gustaría que se 'cargara' el interprete una vez y ejecutara los 4
> scripts uno tras otro (o mejor aun simultaneamente).
>
> He provado /usr/bin/perl  script1 script2 .... pero sólo ejecuta el
> primero.
>

No es possible hacerlo así.  Sí quieres carga sólo uno interprete y carga 
múltiplo funciones simultaneamente necesitaría utilizar fork() - Por 
ejemplo;

#!/usr/bin/perl

my $pid = fork(); ## Tienes 2 procesos ahora.

if ($pid) {
	#  Soy niño
	&funcion1;
} else {
	#  Soy padre.
	&function2;
}


sub funcion1 {
	## hago algo aquí
}

sub function2 {
	## hago algo aquí
}


Todavía tendrá dos Perl procesos así, pero tienes que carga uno.

Saludos
Craig