printf"digital_root(%-12s ",0+$_.")=".($_%9||9)for<>