read s IFS (eval a=$\{s:{35..0}':1} t=${s/$a*$a} b[35-${#t}]+=$a' echo "${b[*]}") $s||. *