map {'ch'.(0+$_)} sort map {sprintf "%.10u", /(\d+)/} @array;