Ordinare array

[Claudio Vituzzi]

Alla fine ci dovrei essere arrivato da solo:

    # Ordino...
   my @SORTED_ARRAY = sort { $HASH{$b} <=> $HASH{$a} } keys %HASH; undef %HASH;

    # Divido in pagine da 10...

    my $Current_page = 1 unless $Current_page;
    my $start = (($Current_page * 10)-1);
    my $end   = (($Current_page * 10)-10);
    my $total_page = int($SORTED_ARRAY / 10);
    my $page_prev = $Current_page - 1;
    my $page_next = $Current_page + 1;
    my @DIECI_IDS;
    push ( @DIECI_IDS , $SORTED_ARRAY[$start .. $end] );

E' giusta la sintassi?