rail, 138 bytes

Result

WA

Code [DL]

$ 'j'      #(c){j}(x)-@
 \-(!x!)(!c!)(c)(x)g<
              #(x)(c)-@

$ 'main'
 \@      
 | \-{j}i--- 
 9  \       >-ooo#
 \-1a-----e/   

stdin

7048925369087533708639422279894776012925342306216385973064424108429321019865854340447553308482970218

stdout

000

stderr

strace