@raw_data = sort @raw_data;

##</code><code>##

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