rail, 142 bytes

Result

AC

Code [DL]

$ 'j'      #(c){j}(x)-@
 \-(!x!)(!c!)(c)(x)g<
              #(x)(c)-@
$ 'main'@
 \@      \-o----
 | \{j}i- \     >#
 9  \    >--u1q/
 \-1a--e/

stdin

1904258799584615490305013630677844462662975073432226244786055093333119953411514332824202377509550566

stdout

0000000000011111111222222222223333333333333444444444444555555555555566666666667777777788888999999999

stderr

strace