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

3968000063093336974901566875522735396961342202890394318912164236997213770237108410376284261968265266

stdout

000

stderr

strace