lancement script perl depuis un autre script perl

EDIT du premier message

Salut tout le monde!

Alors voilà mon petit problème du jours :
mon prgramme comporte plusieurs scripts qui doivent pouvoir être lncer indépendemment si besoin.
le problème que j'ai c'est de lancer un script perl depuis un script perl en passant en argument un tableau de valeur. Je pense que ca doit être possible,mais je ne voit pas trop comment. Est ce qu'un truc comme ca pourrait passer :

Code:

---

1 2 3 4 5 6 7 8

script prère : @tab=...; system(monscript.pl @tab);   script fils :   @argument = @Argv;

---

Dans ce code est ce que le @argument va etre égal à @tab?

Pour le passage de valeur d'une fonction à 'lautre pas de soucis mais en pensant en mode script.. un peu plus compliqué pour moi :oops:

merci d'avance pour vos réponse.

Bonjour,

Comme tu repasses par le système d'exploitation, tu est obligé de passer en argument tout tes arguments, et pas un tableau qui n'existe qu'en Perl.

Par exemple:
use strict;

Code:

---

1 2 3 4 5 6 7 8 9 10

my @tab = ( 1, 2 );   # Construction d"une chaine representant le contenu my ($argList, $i); for $i ( 0 .. $#tab ) { $argList.=" $tab[$i]"; }   exec("/tmp/test2.pl $argList");

---

euh ... si tu as des espaces, ou des caractères spéciaux système (guillemets, $, @ etc...) ça se complique, il faut surement remettre chaque valeur entre simple guillemets pour l'appel système.

Ok je vois le genre!!! merci pour les infos.

pense à utiliser les threads c'est pas mal pour gérer des sous scripts...

Pour les thread j'y avait pensé aussi. Il faudra que je me penche sur le fonctionnement exact pour pas faire de squatte de la mémoire intempestif.