hashes und array verschachtelt - #60417 (Allgemeines zu Perl)

aedu

2005-11-25 15:46

User since
2005-11-25
4 Artikel
BenutzerIn
[default_avatar]

Salü zusammen,

ich möchte ein Conf-File parsen. Hier ein kleiner Auszug:

Code: (dl )

#  TAG: coredump_dir
#       By default Squid leaves core files in the directory from where
#       it was started. If you set 'coredump_dir' to a directory
#       that exists, Squid will chdir() to that directory at startup
#       and coredump files will be left there.
#
#Default:
# coredump_dir none
#
# Leave coredumps in the first cache dir
coredump_dir /opt/lala/squid/var/cache

Es hat immer einen TAG ($tag), ein oder mehrer Default-Einstellungen ($default) und keine, eine oder mehrere selbst erstellte Einstellungen! ($value)

Ich brauche daraus folgende Werte:

Code: (dl )

1
2
3

$tag = coredump_dir;
$default = none;
$value = /opt/lala/squid/var/cache;

Diese Werte speichere ich jetzt folgendermassen:

Code: (dl )

1
2

$hash {$tag}{"default"}[$default];
$hash {$tag}{"value"}[$value];

Jetzt zu meinem Problem! - Wie kann ich nun dieses Konstrukt aus Array und Hashes wieder ausgeben? Ich schaffe es nur die TAGs auszugeben:

Code: (dl )

1
2
3

foreach $key (keys %hash){
    print $key."\n";
}

Kann mir jemand helfen?
Vielen Dank im Voraus!

aedu