Sorting Array Perl (part two)

Question

Right, so I've gotten some help but need some more, I have a pretty good understanding on how to sort an array alphabetically. But now I need to sort it numerically. It's probably a syntax error near "my @test = (sort {items{$a}} <=> {items{$b}} @menu)"

Had it been a hash with two keys I would have a solution, but since this array contains three categories it becomes difficult for me. Obviously looking for some help along with an explanation as possible as I'm eager to learn. Thank you!

my @test = (sort {price{$a} <=> {price{$b}} @menu)

Also if someone could point me to some reading that explains it would be very appreciated, as my luck with google on this topic seems exhausted. — pubba
– pubba, Commented Mar 16, 2015 at 21:47
ad google, try: perl sort array of hashes by multiple values and check first NN links.. ;) — clt60
– clt60, Commented Mar 16, 2015 at 21:51

Hynek -Pichi- Vychodil · Accepted Answer · 2015-03-16 22:04:11Z

2

The issue is item{$a}. It looks like you are trying get some value from hash item which is not a hash, of course.

my @test = sort { $a->{price} <=> $b->{price} } @menu;

You can sort according more than one field as well

my @test = sort {
           $a->{price} <=> $b->{price}
        or $a->{color} cmp $b->{color}
        or $b->{items} cmp $a->{items} # note reverse order
    } @menu;

edited Mar 16, 2015 at 22:04

answered Mar 16, 2015 at 21:55

Hynek -Pichi- Vychodil

26.2k5 gold badges55 silver badges75 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

pubba Over a year ago

This is honestly just plain annyoing. I swear to god I've tried that exact syntax on price earlier but it did not return the right result. However now it does.. Thank you!

ThisSuitIsBlackNot Over a year ago

@pubba Note the difference between cmp (for strings) and <=> (for numbers).

Miguel Prz · Accepted Answer · 2015-03-16 22:02:22Z

0

This is how to order by prize:

my @test = sort { $a->{prize} <=> $b->{prize} } @menu;

and in descending order, just change $a and $b:

my @test = sort { $b->{prize} <=> $a->{prize} } @menu;

edited Mar 16, 2015 at 22:02

answered Mar 16, 2015 at 21:56

Miguel Prz

13.8k32 silver badges42 bronze badges

Collectives™ on Stack Overflow

Sorting Array Perl (part two)

2 Answers 2

2 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

2 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related