Discussion :

[Elessar01]

Bonjour,
j'aurai besoin d'aide pour lancer un script Perl depuis PHP. Lorsque je reçois un mail je veux lancer un script Perl qui me découpe ce mail. je l'ai testé en ligne de commande il fonctionne sans problème.
Quand je veux l'intégrer à PHP je n'arrive pas l'éxécuter. J'ai chercher dans différents forums et je ne trouve jamais la même chose.

Pour le moment j'utilise ceci mais ça ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
exec("Perl cutmessage.pl" $MAIL);

Merci pour votre aide.

[djibril]

C'est surement un souci de chemin. As tu essayé

Code php :

Sélectionner tout - Visualiser dans une fenêtre à part

exec("Perl \"/ton/chemin/cutmessage.pl\" $MAIL");

Qu'est ce qu'il y a dans $MAIL ?

[Elessar01]

je vais réessayer en mettant le chemin en absolu.
$MAIL est en fait le mail que je veux découper. Je le met en paramètre de ma fonction et le script le décompose en 3 parties.
- le header du mail
- le corps du mail
- autant de fichiers que de pièces jointes

[Elessar01]

J'ai mis le chemin en absolu comme tu m'as dit.

j'ai vérifier les logs et j'ai l'erreur suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
sh: Perl: command not found

Mon projet PHP ne dois pas connaitre Perl je pense mais je ne sais pas comment le rajouter
j'ai ceci dans mo fichier Perl mais dois-je le mettre dans mon fichier Php ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

#!/usr/bin/perl

ou un include ?

[djibril]

oup's, je n'avais pas vu.
C'est perl et pas Perl.

[Elessar01]

Bon j'arrive à lancer le script c'est bon mais maintenant le parametre $MAIL ne marche pas car il reçoit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
$MAIL = file ( "php://stdin" );
exec("perl \"/home/htdocs/cutmessage.pl\" $MAIL");

$MAIL est de type Array et il me faut un fichier en entrée
comment puis-je passer "php://stdin" en paramettre de mon exec?

[djibril]

Quand tu lances le programme perl en ligne de commande, quelle commande fais tu ?

[Elessar01]

j'utilise la commande :
perl -w cutmessage.pl msg.IAkLC

et msg.IAkLC est un mail encodé.

[Elessar01]

Bonjour, j'ai enfin réussi à lancer le script.

Je vais expliquer comment ça se passe dans mon cas, ça pourra peut-être servir à d'autres.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
//ouverture dun fichier en écriture
$fichiermail=fopen("monfichiermail.txt","w");
//on écrit dans un fichier le flux en entrée 
fwrite ($fichiermail,file_get_contents('php://stdin'));
fclose($fichiermail);
 
$cmd="perl -w /home/cutmessage.pl /home/monfichiermail.txt";
// on execute la commande Perl
exec($cmd);

J'éspére que mon expérience pourra servir à d'autres.

Merci pour l'aide avec les cours et tutoriels pour apprendre Perl : http://perl.developpez.com/cours/

A++