Perl

[Perl] générer une variable grace à une chaine

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Perl] générer une variable grace à une chaine

axl the mux

Bonjour,

je souhaite creer une variable dynamiquement en concatenant du texte genre :

$a{a}{b}="oui"

$b="$a{a}";
$c="{b}";

$d=$b.$c

et que $d vaille oui et non pas "$a{a}{b}"

comment faire ?

merci d'avance

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

Publicité

Elmoricq

Modérateur

Bleârgh.

Utilise plutôt les hashmaps.

axl the mux

Message cité 1 fois

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

axl the mux

perl -e '$a{a}{b}="oui";%b=$a{a};print "$b{b}\n";'

ca ne fonctionne pas plus ...

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

anapajari

s/travail/glanding on hfr/gs;

s'nawak [:mlc]
En fait je comprends même pas pourquoi tu peux avoir besoin de faire un truc comme ça...
Si tu nous expliquais un peu! Là je suis sur que tu te compliques la vie pour rien!!!

anapajari

s/travail/glanding on hfr/gs;

d'ailleurs t'as derniere ligne ne peut pas marcher
il faut que tu fasse $b = $a{'a'} et pour le printer $$b{'b'}
Mais je continue a dire que je comprends pas le besoin ...

axl the mux

sympa .....

en gros je veux attaquer differents niveaux d'un tableau associatif sans savoir le nombre de niveau de celui-ci.

$t=toto;

{ $ass{$t}} if ($niv == 1)
{ $ass{0100}{$t}} if ($niv == 2) .....

je cherche a faire une boucle pour remplacer les if car je ne connais pas le nombre de niveau .

merci d'avance

Message cité 1 fois

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

anapajari

s/travail/glanding on hfr/gs;

comment tu détermines la clé de "premier niveau" si tu as $niv == 2?

axl the mux

je stocke les clefs de chaque niveau ds un tableau separe que je mets a jour a chaque changement de cle

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

axl the mux

$c[0]="0010";
$c[1]="0100";
$c[2]="0200";

$t=toto;

{ $ass{$c[0]}} if ($niv == 1)
{ $ass{$c[0]}{$t}} if ($niv == 2) .....

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

Publicité

anapajari

s/travail/glanding on hfr/gs;

En gros tu as un truc comme ça:

Code :

my $key = 'toto';
my $niveau = 3;
my @c = ('0010', '0100', '0200');
my %ass;
$ass{'toto'} = 1;
$ass{'0010'}{'toto'} = 'X';
$ass{'0010'}{'0100'}{'toto'} = 'Z';
$ass{'0010'}{'0100'}{'0200'}{'toto'} = 8;

et $niveau varie et en fonction tu veux récupérer le bon?
En attendant que Popos ou Elmoricq te donne teh solution, tu peux toujours faire un truc comme ça:

Code :

my $hr = \\%ass;
for (my $i=0; $i<$niveau-1;$i++){
$hr = $$hr{$c[$i]};
}
print $$hr{$key};

Mais je continue a penser que cela ne te permettra que de contourner un problème de conception dans ton bouzin!

Message cité 1 fois
Message édité par anapajari le 19-07-2006 à 16:46:09

axl the mux

merci a toi
je vais voir ca

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

axl the mux

en faite je veux initialiser les valeurs et pas les recuperer

---------------
nos utopies d'aujourd'hui sont les réalités de demain.

Elmoricq

Modérateur

axl the mux a écrit :

Hâchages/Tableaux associatifs.

axl the mux a écrit :

Je ne comprends vraiment pas ce que tu souhaites faire : stocker dans un tableau un hâchage ? Stocker dans un hâchage un tableau, voire des sous-hâchages ?
En fait, peux-tu expliquer l'algorithme que tu veux implémenter, ou plus simplement la problématique à résoudre ?

anapajari a écrit :

En gros tu as un truc comme ça:

Code :

my $key = 'toto';
my $niveau = 3;
my @c = ('0010', '0100', '0200');
my %ass;
$ass{'toto'} = 1;
$ass{'0010'}{'toto'} = 'X';
$ass{'0010'}{'0100'}{'toto'} = 'Z';
$ass{'0010'}{'0100'}{'0200'}{'toto'} = 8;

et $niveau varie et en fonction tu veux récupérer le bon?
En attendant que Popos ou Elmoricq te donne teh solution, tu peux toujours faire un truc comme ça:

Code :

my $hr = \\%ass;
for (my $i=0; $i<$niveau-1;$i++){
$hr = $$hr{$c[$i]};
}
print $$hr{$key};

Mais je continue a penser que cela ne te permettra que de contourner un problème de conception dans ton bouzin!

Je veux bien proposer "teh solution", mais je pige pas ce qu'il veut faire, et j'avoue que ce que tu as écrit me laisse un peu perplexe aussi. :??:
Je suis un peu comme toi, j'ai le sentiment qu'une fois qu'on aura dégagé le coeur du problème, on pourra trouver une solution toute simple.

Message édité par Elmoricq le 19-07-2006 à 23:31:48

FORUM HardWare.fr

Programmation

Perl

[Perl] générer une variable grace à une chaine

Sujets relatifs
[resolu] [batch] recherche chaine avec findstr	comment stocker le resultat d'un "select" dans une variable
executer un script perl periodiquement	Soucis avec form + variable
[VBA] RESOLU Extraction d'une chaine de caractères	incohérence entre une variable et son test
Récuper du texte dans un fichier puis la mettre dans une variable	Passer une variable dans la définition d'un width
Introduction d'une variable dans un texte	[Batch] Récup variable %TEMP% de l'admin
Plus de sujets relatifs à : [Perl] générer une variable grace à une chaine

Page générée en 0.073 secondes