Help for this page

Select Code to Download


  1. or download this
    for my $key (sort { $ref->{$b}->[CONSTANT] <=> $ref->{$a}->[CONSTANT] 
+} keys %$ref)
  2. or download this
    for my $key (sort { $ref->{$b} <=> $ref->{$a} } keys %$ref)