tildele variabel 'variabel' værdi

hvis du kører uden strict så kan du blot bruge variablen så opretter perl selv den for dig. Det andet du spørger om er vist mere en hash du kigger efter

prøv evt at bruge

$abc123->{"kendetegn1"}=10;
$abc123->{"kendetegn2"}=30;

husk at variable i perl starter med en $ .. er det en konfigurationsfil du bruger?

ok, men du skriver $abc123 problemet er at jeg ikke kender variablens navn til at starte med. Det *kunne* være abc123, men det kan også vise sig at være 'def789'

ok, jeg kan godt se hvad du mener. Er det ikke så ret svært at håndtere disse variable bagefter, medmindre du lægger dem ind i en hash eller i et array som du kan løbe igennem ?

problemet er at jeg får x antal variabler fra forskellige steder. Disse skal derefter tildeles forskellige værdier efterhånden som disse kendes.

Jeg kan ikke lave alm. arrays, da antallet af variabler er ukendte.

Så jeg har behov for at kunne oprette dem efterhånden som jeg kender dem og fylde data i dem. Når jeg er færdig med dem har jeg nok også behov for at kunne slette dem igen.

googlede mig frem til følgende:

$var="abc123";
%hash = ( key => "$var", lemon => "curd" );

det lyder som et job for Hash-man :-)

Nej, hvis du lægger variablene ind i en hash, kan du udvide og indskrænke den efter behov og løbe den igennem for at få værdierne ud.
Det vil være noget ala
$myhash{$variabel1}{"kendetegn1"}=10;
$myhash{$variabel2}{"kendetegn1"}=20;

dammit .. jeg er langsommmere end google :-)

svar?

Jeg har 2 tillægsspørgsmål i denne forbindelse

Hvordan printer jeg hele indholdet af $myhash{$variabel2}

Hvordan sletter jeg hele $myhash{$variabel1} Således at der ikke benyttes hukommelse til denne?

(men ellers ser det ud til at virke) :)

du må gerne beholde pointsne - jeg regner med at trække lidt på dig i forbindelse med at lave den dist som jeg skrev om  :-)

while(($key, $value) = each(%myhash)) {
    print "$key = $value";
}

pointsne - pointene, mente jeg :-)

oki.. thx... Så må jeg se hvor meget jeg kan hjælpe med... :)

mon ikke :-)

HAr stadig et lille problem

Hvis jeg kører din løkke for at udskrive indholdet får jeg dette svar:

= HASH(0x82c53a0)

ok - det ser ud som om du har endnu en hash inde i din ydre hash (hvis du har gjort som jeg skrev så passer det også meget godt).

I så fald skal du lave endnu en løkke ala den jeg beskrev og hente værdierne ud. Noget i denne stil:

while(($key, $value) = each(%myhash)) {
  while(($key1, $value1) = each(%{$value})) {
    print "$key1 => $value2\n";
    }
}