Hallo Kurt!
Die Derefenzierungsregeln haben lauter inkompatible Ausnahmeregeln.
Vielen Dank für die Erläuterungen.
Perl6
Bis es soweit ist, habe ich vielleicht gerade noch Zeit, Perl5 zu verdauen ;)
Und daher eine Frage, die mehr oder weniger im Zusammenhang steht... Ich suche eine elegantere Möglichkeit, die Werte eines Hashs in einem Hash zu sortieren, als diese in ein temporäres Array zu pushen:
use strict;
use mywebdata;
my @temp;
foreach my $key (keys %FILES) {
push (@temp, $FILES{$key}{'DESCRIPTION'});
}
foreach (sort @temp) { print $_, $/ };
Der Hash in mywebdata.pm sieht wie folgt aus:
%FILES=(A_index => { 'TITLE' => "Amazing Sucky Intro/Atomic Sitemap",
'DESCRIPTION' => "Atomic-Eggs - Die humosophische Site.",
'ALT' => [ "http://old.atomic-eggs.com", "http://selfpezial.atomic-eggs.com" ],
'CREATED' => "2006-08-27T00:00+01:00"
},
B_wae_00 => { 'TITLE' => "Willkommen auf Atomic Eggs",
'DESCRIPTION' => "Begrüßung, Willkommen, Startseite der Rubrik »Willkommen auf Atomic Eggs«.",
'ALT' => [ "http://old.atomic-eggs.com/home.html" ],
'CREATED' => "2006-08-27T00:00+01:00"
},
B_wae_01 => { 'TITLE' => "Informationen für Erstbesucher",
'DESCRIPTION' => "Informationen für Besucher, die das erste Mal Atomic Eggs »betreten«.",
'ALT' => [ undef ],
'CREATED' => "2006-08-27T00:00+01:00"
},
.
.
.
.
.
.
);
Das soll eine Abbildung meines Webs sein, die dateiabhängige Head-Inhalte (title, meta, link-Elemente) für ein Skript bereit hält, das mir den kompletten <head>-Bereich generiert (ich habe bereits ein funktionierendes Skript, das eben das macht, nur das stelle ich hier lieber nicht zur Diskussion *g*).
Viele Grüße aus Frankfurt/Main,
Patrick