rail, 444 bytes

Result

WA

Code [DL]

$ ':'
 \-(!a!)(a)(a)#


$ 'k'
 \                         #(r)(!x!)-@
  \-2m(!q!)[0](!r!)55m--{:}--1g----<
                      /             |
 @-------------------/              |
   \          \                     |
   |           >-qfq(q)ms1{:}{:}s1--/
   \-(!r!)[1]-/

$ 'main' 
 \                 #   @
  \--59m5a---{:}0g<     \---------aq[1]-@
          /        -1s0---2mi{:}[\n\]q<
         /--------------------o{k}(!d!)-@
        @

stdin

01101110
11001000
00001010
00100100
01001101
00000011
00000000
10011001
10010100
10101110
10001101
00010101
01001111
00011100
10010110
00010110
11001010
01011011
01111000
11101010
10001001
01010011
01011011
01000010
11100111
10101011
10101100
10000110
01100000
00110111
00011001
01001110
00000001
11010010
10100100
11100011
10011001
00000110
01101001
10111110
10001000
00001111
11101100
00111000
11111101
00111100
01001001
11001011
10010011
00101101

stdout

00000110000000000000000000000000000000100000010000

stderr

strace