@array = sort { $b <=> $a } @array; printf("%03d",shift @array);