如何在perl中對散列數組中的元素進行排序

Question

想知道如何通過提前完成任何想法/建議來完成下面的排序。下面的內容將以html格式打印在表格中，並且在表格/ html格式的每一列旁邊都有一個箭頭鍵很好，所以用戶通過點擊它可以對列進行排序，如果您對這部分有興趣，也會很感激。感謝我的好程序員！

my %file_result = (
        "name" => "$name", 
        "total" => "$total", 
        "pass" => "$pass", 
        "fail" => "$fail", 
        "done" => "$done", 
        "date" => "$date" 
        ); 

      push @results, \%file_result; 
     } 
    } 

    @results = sort {$file_result{$a->{done}} <=> $file_result{$b->{done}}} 
    # @results = sort {$a->{done} <=> $a->{done}} @results; 

Answer 1

您註釋掉的是正確的方法。或者，如果做的是α，然後用CMP代替< =>

@results = sort {$a->{done} <=> $b->{done}} @results;