PHPのarray_multisort関数をPerlで
PHPのarray_multisort関数が激便利だったので紹介 : akiyan.com
書いてみた。
my @sales = ( { 'title' => 'ほげほげ1', 'amount' => 3, }, { 'title' => 'ほげほげ2', 'amount' => 2, }, { 'title' => 'ほげほげ3', 'amount' => 5, }, ); my @result = sort { $b->{amount} <=> $a->{amount} } @sales;
やっぱPerlのsort関数は便利だね。柔軟だし好きだなぁ。