the command 'sort' allow you to put in your own routine to do sorting.
%usernum = ("server.one.com" => "15",
"server.two.com" => "5",
"server.three.com" => "14",
"server.four.com" => "9");
@arr = sort {$usernum{$a} <=> $usernum{$b}} (keys %usernum);
print join(" ", @arr);
Tor.
dan wrote:
>
> (sorry if this message comes twice.. didn't appear to have sent the first
> time)
>
> I have a small query regarding how to sort hash entries in numerical order.
>
> %usernum { "server.one.com" "15",
> "server.two.com" "5",
> "server.three.com" "14",
> "server.four.com" "9" }
>
> How can i get perl to return these 4 server names in the correct order,
> server.two.com
> server.four.com
> server.three.com
> server.one.com
>
> Help much appreciated
>
> Dan
>
> --
> 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]
