my ($middle,$median)=median_num(@new_sort);
    median_num(\@sorted);