@newarray = (@alldata{data}[0], @alldata{data}[1])
@maxref = sort { $b->{data} <=> $a->{data} } @newarray