关于sort排序问题.

klathleen

1. #!/usr/bin/perl
   
2. use warnings;
   
3. use strict;
   
4. my %url_count;
   
5. while (<>){
   
6.         $url_count{$_}++;
   
7. }
   
8. foreach (keys %url_count){
   
9.         my $url=$_;
   
10.         my $count=$url_count{$url};
    
11.         printf "%6d %s",$count,$url;
    
12. }

复制代码

菜鸟提问:  我想对$count 以降序的方式排序.sort {$b<=>$a}  但是我不知道应该在哪里插入sort排序.是不是应该把count的每个值保存为数组.再对数组做排序呢.求解答  谢谢

wtuter

回复 1# klathleen


    这个应该在foreach hash的时候排序

    foreach (sort {$url_count{$b} <=> $url_count{$a} } keys %url_count)

klathleen

成功了.呵呵...谢谢wtuter...

xingxiangyi

学习了