while[read -n1 C]{++a[C]};for((;i++<10;)){for((j=a[i];j--;)){o+=$i}};$o