> $slovo{'test'}="neco"; > $klic="test"; > print "$slovo{'$klic'}\n"; k cemu jsou tu ^ a ^ ? perl $slovo{'test'}="neco"; $klic="test"; print "$slovo{$klic}\n"; ^D neco Dan