@raw_data = sort {$b <=> $a} @raw_data