Thread Delphi "Record" in Perl gesucht (11 answers)
Opened by Mampfgnom at 2011-01-07 13:03

GwenDragon
 2011-01-07 13:21
#144171 #144171
User since
2005-01-17
14787 Artikel
Admin1
[Homepage]
user image
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)

View full thread Delphi "Record" in Perl gesucht