Forum Programmation.perl Je voudrais lancer plusieurs script Perl à partir d'un autre script Perls.

Posté par  . Licence CC By‑SA.
Étiquettes : aucune
-3
29
sept.
2015

Bonjour a tous,
j'ai plusieurs Perl-Script que je voudrais appeler à partir d'un autre script Perl.
les scripts doivent être exécutés dans l'ordre ci dessous.

chaque script Perl a un paramètre d'entrée

1-script1.pl a comme paramètres d'entrée: perl script1.pl default.xml * .xml
2-script2.pl a comme paramètres d'entrée: perl script2.pl data.csv
3-script3.pl a comme paramètres d'entrée: perl script3.pl data.csv
4-script4.pl a comme paramètres d'entrée: perl script4.pl data.csv

5-script5.pl a comme paramètres d'entrée: perl script5.pl data.csv
6-script6.pl a comme paramètres d'entrée: perl script6.pl default.xml default.xml
7-script7.pl a comme paramètres d'entrée: perl script7.pl data2.csv default.csv

S'il vous plaît quelqu'un peut-il m'aider a résoudre ce probleme?

tous mes remercierments

  • # system() ?

    Posté par  . Évalué à 2.

    Tu as consulté la commande system() ? Ça pourrait peut-être t'aider à avancer ; quelque chose comme

    use strict;
    use warnings;
    
    system script1.pl, default.xml, '*.xml';
    system script2.pl, data.csv;
    system script3.pl, data.csv;
    system script4.pl, data.csv;
    system script5.pl, data.csv;
    system script6.pl, default.xml, default.xml;
    system script7.pl, data2.csv, default.csv;

    Je n'ai rien testé, je te laisse le soin de le faire :-)

    • [^] # Re: system() ?

      Posté par  . Évalué à -6.

      Salut Nicolas,

      merci de ta proposition, je me pose la question a savoir que dois je tape dans mon perl Commando-line si je devrai par exemple executer le script1.pl car la j'ai essaye avec

      perl main.pl default.xml *.xml

      en tenant compte que j'ai nomme mon script plus main.pl

      • [^] # Re: system() ?

        Posté par  . Évalué à -6.

        je pense avoir trouve la solution a mon probleme

        • [^] # Re: system() ?

          Posté par  . Évalué à 2.

          et quelle serait la solution ?

          • [^] # Re: system() ?

            Posté par  . Évalué à -6.

            Salut Neox,

            desole de te repondre tardivement

            en tapant dans perl command line:

            perl main.pl system('script1.pl  default_sysdumpdev_150319.xml *.xml')

            toutes les autres fonctions sont execute automatiquement

Suivre le flux des commentaires

Note : les commentaires appartiennent à celles et ceux qui les ont postés. Nous n’en sommes pas responsables.