Thread Delphi "Record" in Perl gesucht
(11 answers)
Opened by Mampfgnom at 2011-01-07 13:03
Ein Hash könnte sowas abbilden.
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 my %personen = ( 'Moppel' => { Alter => 5, Name => 'Oskar Mopso', Groesse => 115 }, 'Kamel' => { Alter => 27, Name => 'Dr. O. Medar', Groesse => 250 }, ); $personen{'Nullnummer'} = { Alter => 0, Name => 0, Groesse => 0 }; print "Der Name von Kamel ist ", $personen{'Kamel'}->{Name}, "\n"; # bei nicht definierten Personen erstellt Perl den Hash, der enthält dann aber undef als Wert! AutoVivocation heißt das. print "Der Name von Rapsolody ist ", $personen{'Rapsolody'}->{Name}, "\n"; Last edited: 2011-01-07 13:25:07 +0100 (CET) |