you're right.
in the original example i stole this from, there were
some function calls and data tests. without them,
this is overly complex .
Angus Lees wrote:
> On Mon, May 14, 2001 at 05:14:31PM -0700, ___cliff rayman___ wrote:
> > if by value order by key order then:
> > @application_k
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_A
if by key order then"
@application_k = sort keys %GSIS::PROD_APPLICATION;
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_A
perldoc -f sort
On 2001.05.11 14:00:59 -0400 Andy Lim wrote:
Hello.
I want to sort a hash which contaning key-value pair for a list checkbox
(like below) so that it print in the specific order.
Anyone know how to do this?
[-
@application_k = keys %GS
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
At 11:00 AM -0700 5/11/01, Andy Lim wrote:
>Hello.
>I want to sort a hash which contaning key-value pair for a list checkbox
>(like below) so that it print in the specific order.
>Anyone know how to do this?
>
>[-
>
