Hi,

I need to store a list of month names into a hash structure such that:

$self->{monate}->{1}->{bezeichnung} = 'Januar'
$self->{monate}->{2}->{bezeichnung} = 'Februar'
etc.

Until now, I have used the rather clumsy:

@month_hash{1..12} = ("Januar", "Februar", "März", "April", "Mai", "Juni", 
"Juli", "August", "September", "Oktober", "November", "Dezember");

for (sort keys %month_hash) { $self->{monate}->{$_}->{bezeichnung} = 
$month_hash{$_}; }

The following did not work:

@{$self->{monate}->{1 ..12}->{bezeichnung}} = ("Januar", "Februar", "März", 
"April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", 
"Dezember");

Is there a better way to do it? These references are making my brain swirl.

Thanks,

Jan
-- 
A good programmer is someone who looks both ways before crossing a one-way 
street. - Doug Linder

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to