Tak tohle se mi zda opravdu nefer!

[Martin Caslavsky]

Narazil jsem na takovejhle skriptik

$h{prvni}{vek} = 100;
$h{prvni}{plat} = 1000;
$h{druhy}{vek} = 200;
$h{druhy}{plat} = 2000;
%vyber = ( prvni => "a", treti => "c");

foreach $key (sort keys %vyber) {
 if (exists $h{$key}{vek}) {
  # .....
 }
}

print scalar keys %h;

Vysledkem je 3, tedy do hashe se v prubehu testovani prida dalsi klic.
Nevim, ale me osobne to prijde jako rana pod pas -- opatrne na to saham,
podminkou jenom tak otuknu, a po projeti podminky mi perl pohotove vytvori
dalsi polozku.
Uz vim, ze spravne (aby to fungovalo :) musi ta podminka byt jenom
    if (exists $h{$key})
ale chci se zeptat, jestli vam tohle chovani prijde normalni? Vzdyt to za
chvili muzu cekat, ze se mi stane to samo kdyz udelam if exists $hash{$key}
a sup uz ho tam mam!

S pozdravem
Martin Caslavsky