Hash dynaisch erzeugen

[roger]

Hallo,

tie my %daten, "Tie::Hash::Indexed" or die $!;
tie my %maschinen, "Tie::Hash::Indexed" or die $!;

ein Hash vom Typ %maschinen (Hash::Indexed) erzeugen (wäre so gedacht :-)

$maschinen{$counter} = ["foo","bar"];

eine Referenz von diesem Hash auf das "Haupthash" legen (wäre so gedacht :-)

$daten{$masch} = $maschinen{$counter};

Warum erzeugst du nicht einfach einen Hash. Jeder Maschine wird eine hashreferenz zugewiesen.

$daten{$masch} = {
     index => $counter,
     name  => $varname,
     value => $value,
     };

Natürlich soll es so in etwa aussehen, jedoch kann ich kein normales Hash benutze, sondern "MUSS" das Indexed Hash benutzen, die Reihenfolge wird bei der Erzeugung festegelegt und muss immer gleich bleiben.

$daten{$masch} = referenz von Indexed-Hash [x]
$maschinen[x] = namex => value, namey => value, name... =>value

$daten{$masch} = referenz von Indexed-Hash [y]
$maschinen[y] = namex => value, namey => value, name... =>value

usw.

zugreifen will ich $daten{'masch'}{'messwertname'} = 'messwert'
das geht schneller einfacher als jedesmal den Index abzufragen.

Danke
      roger