Discussion :

[chpog]

Bonjour,
mon pb est le suivant j'ai une liste dasn ma fonction principale et je veux modifier celle ci en la passant en parametres! alors j'ai essayé le passaeg apr référence masi ej crois j'arrive pas à trouver la bonne syntaxe pour que ca marche!!

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 
$NbPan=$this->getPanModele(\%ListPan);
while ((my $key,my $value) = each %ListPan)
{
  print "Pant = $key Valeur = $value\n";
}
 
 
sub getPanModele
{
    my $this=shift;
    my $RefPan = shift;
    $ValuePantone = $NodeValeur->getFirstChild->getNodeValue;
    $RefPan{"250"}=28;
    while ((my $key,my $value) = each %{$RefPan})
    {
	print "Pantone = $key Valeur = $value\n";
    }
    return 1;
}

Voilà si quequ'un peu m'aider dasn la fonction la list est bien modifié mais au retour dans la fonction principale ben y a rien!!


Merci d'avance!!

[shwin]

essaye ca

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
my %list;
$list{10} = 10;
test(\%list);
warn $list{10};
 
sub test { 
        my $list = shift; 
        use Data::Dumper;
        warn Dumper $list->{10} = 20;
}

[2Eurocents]

Et comme ça ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
$NbPan=$this->getPanModele(\%ListPan);
while ((my $key,my $value) = each %ListPan)
{
  print "Pant = $key Valeur = $value\n";
}
 
sub getPanModele
{
    my $this=shift;
    my $RefPan = shift;
    $ValuePantone = $NodeValeur->getFirstChild->getNodeValue;
    $RefPan->{"250"}=28;
    while ((my $key,my $value) = each %{$RefPan})
    {
	print "Pantone = $key Valeur = $value\n";
    }
    return 1;
}

[chpog]

DSL j'étais absent mais merci de vos réponses et c bon ca fonctionne !!
Merci encore !!!