équivalent de include du php, mais en perl.

Bonjour à tous,

voila mon but :

j'ai deux scripts : script1.pl et script2.pl

dans script2.pl je déclare simplement une variable

Code:

---

my $test="hello";

---

j'aimerai faire un

Code:

---

print "$test\n";

---

dans le script script1.pl et donc qu'il m'affiche hello

j'ai essayer use et require de script2.pl dans script1.pl, mais le pb est qu'ils executent le script2.pl mais ne gardent pas en mémoire le contenu de cette variable.

quand je dis équivalent a include en php, je ne sais même plus si ca le fais en php....

bref si quelqun a un truc à me proposer ca m'aiderait grandement

thx by advance

Ce qui ce rapproche le plus.

fichier testA.pm

Code:

---

1 2 3 4 5 6 7 8

package testA; use strict; my $v_test=5; sub f_test{ return $v_test; } 1;

---

fichier testB.pl

Code:

---

1 2 3 4

use testA; print &testA::f_test()."\n"; __END__

---

résultat

Code:

---

1 2 3 4

$ perl testB.pl $ 5 $

---

--
http://vgt.fr