Bonjour a tous et a toute,

Je possede trois fichiers:

test1.pl:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
my $i = 0;
sub main
{
  print "hello";
  $i++;
}
sub print_i
{
  print "i = $i";
}
test2.pl:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
require 'test1.pl';
main();
open(PRINT_I, "./test3.pl |");
close (PRINT_I);
test3.pl:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
require 'test1.pl';
print_i();
Comment faire pour que la variable $i soit la meme?

Donc, lorsque j'appel ./test2.pl ceci m'affiche: hello i = 1

Merci d'avance pour votre aide