Re: [PERL] Sortering af hash keys

["Christian Sandfeld" <sslug@sslug>]

Tak for hjælpen Christoffer, det "spiller 100" :)

/Christian

----- Original Message -----
From: Christoffer Hall-Frederiksen <sslug@sslug>
To: <sslug@sslug>
Sent: Saturday, April 22, 2000 3:32 PM
Subject: Re: [PERL] Sortering af hash keys


> On Fri, Apr 21, 2000 at 11:54:58PM +0200, Christian Sandfeld wrote:
> >     foreach $navn (sort keys (%NAVNE)) {
> >         print "$navn\n";
> >     }
>
> foreach $navn (sort values %NAVNE)

>     print $navn, "\n";
> }
>
>
> > Er der nogen der kender en måde at sortere en sådan liste så det kommer
ud i
> > alfabetisk orden, uden at ændre på "casen" på de enkelte entrys ?
>
> foreach $navn (sort {lc($a) cmp lc($b)} values %NAVNE)

>     print $navn, "\n";
> }
>
> --
> Christoffer
>