Help for this page
Select Code to Download
Select
or
download this
@newarray = sort { $b->{size} <=> $a->{size} @array;