map {"ch$_"} sort {$a <=> $b} map {/(\d+)/} @array