@sort = sort {$b <=> $a} @{ $array[0] };