----- Original Message ----- 
From: "Tomasi, Chuck" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, February 06, 2002 1:17 PM
Subject: Sorting an array of hashes


> Does anyone have any clever ideas for sorting an array of hashes based on
> a key such as an ID number?
> 
> Example:
> 
> @AoH = (
> { ID => 10101, UserID => 1041, Status => 2 },
>         { ID => 10541, UserID => 1211, Status => 1 },
>         { ID => 10111, UserID => 1211, Status => 2 },
>         { ID => 10721, UserID => 1198, Status => 1 }
> );
> 

I think this will do what you are looking for...

use strict;

my @AoH = (
  { ID => 10101, UserID => 1041, Status => 2 },
  { ID => 10541, UserID => 1211, Status => 1 },
  { ID => 10111, UserID => 1211, Status => 2 },
  { ID => 10721, UserID => 1198, Status => 1 }
);

for(sort { $a->{ID} <=> $b->{ID} } @AoH) {
  print $_->{ID}."\n";
}

Shawn

> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 
> 
> 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to