On Mon, May 14, 2001 at 05:14:31PM -0700, ___cliff rayman___ wrote:
> if by value order by key order then:
> @application_k =
> map {$_->[0]}
> sort {$a->[1] <=> $b->[1] || $a->[0] cmp $b->[0]}
> map {[$_ , $GSIS::PROD_APPLICATION{$_}]}
> keys %GSIS::PROD_APPLICATION;
>
> the second one is called a schwartzian transform. u should be
> able to find an explanation of it on the web.
i don't get it. why not just do:
*h = \%GSIS::PROD_APPLICATION; # just to make the example shorter..
@k = sort {$h{$a} <=> $h{$b} || $a cmp $b} keys %h;
--
- Gus
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
