zweidimensionaler hash (Allgemeines zu Perl)

[thread]7236[/thread]

zweidimensionaler hash

Leser: 2

Strazke

2005-08-28 02:27

User since
2005-07-11
120 Artikel
BenutzerIn
[default_avatar]

hallo, ich möchte zu einem Benutzername mehrere sachen speichern(wie Vorname, Nachname,...). Allerdings weis ich noch nicht, wie die Benutzernamen sind (werden aus einer Datei ausgelesen). Ich habe mir es so vorgestellt, dass man sozusagen ein zweidimensionalen hash macht(bsp: maus=>Vorname=>Anne).

Lässt sich das irgendwie realisieren, denn soviel ich weis, gibt es in Perl keine mehrdimensionalen Sachen???

Gast Gast

2005-08-28 02:54

perldoc perldsc

[E|B]

2005-08-28 03:01

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=Strazke,28.08.2005, 00:27]Lässt sich das irgendwie realisieren, denn soviel ich weis, gibt es in Perl keine mehrdimensionalen Sachen???[/quote]
Mehrdimensionale Datenstrukturen lassen sich in Perl besser als in einer anderen Sprache handeln.

Code: (dl )

# Beispiel: Zweidimensionales Array

my @array = ([0, 1], [2, 3], [3, 4]);
print $array[1][0];   # Ausgabe: 2

# Beispiel: Zweidimensionaler Hash

my %hash = ('name' => {'vorname' => 'Larry', 'nachname' => 'Wall'});
print $hash{'name'}->{'vorname'};   # Ausgabe: Larry

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Strazke

2005-08-28 11:14

User since
2005-07-11
120 Artikel
BenutzerIn
[default_avatar]

Wow, da war ich ja komplett falsch informiert. Danke für die Lektion :)

Strat

2005-08-28 14:34

User since
2003-08-04
5246 Artikel
ModeratorIn

vor allem ist das schoene in perl, dass man die dimension nicht festzulegen braucht (wie in manch anderen sprachen), und man auch die verschiedenen typen durcheinanderwerfen kann, z.B.

Code: (dl )

my @data = (
  { value1 => { name => 'xyz', values => [1..20] } },
  { value2 => { name => 'abc', values => [21..40] } },
  { value3 => { name => 'era', values => [41..60] } },
  { value4 => { name => 'bla', values => [ [61,61.5], [62,62.5] ] }
);

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View all threads created 2005-08-28 02:27.