Appel de script perl

Bonjour

Je commence php, et je dois l'associer à perl, language que je ne maitrise pas

je voudrais commencer par faire un simple appel dans php

Code:

---

1 2 3

$node = exec('perl ../script/test.pl '.$requete.''); print ($node);

---

et voici ce que j'ai écris en perl

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

#! /usr/bin/perl   do '../library/evolution_lib.pl';   sub myfonction(@ARGV) { $ARGV = @ARGV; my $taxid = $ARGV[0]; my $node = evolution::FindNearestNode($taxid); retrun $node; }

---

mais quand j'exécute sur ma page web, ben j'ai rien, ça reste coincé au script de traitement php

HELP PLEASE:calim2::calim2::calim2::oops::oops::oops::oops:

j'ai été aidé sur une autre section du forum

thx quand meme

Code:

---

1 2 3 4

$node = ('perl ../library/test.pl '.$_SESSION['nom'].' prodom'); $i=exec($node); print ($i);

---

Code:

---

1 2 3 4 5 6 7 8

#! /usr/bin/perl   do '../library/evolution_lib.pl';   my $taxid = $ARGV[0]; my $node = evolution::FindNearestNode($taxid,$ARGV[1]); print "$node\n";

---