s/[79]\B/~-$&."0 1"/e,s/8\B/4 2/,s/(??{$'<17}).\B\K(?!0)/0 /,print$_,$/for 1..100