perl, 42 bytes

Result

WA

Code [DL]

print 1+oct("0b".$_)*8**.5%2-1?0:1 while<>

stdin

01011111
10101011
00011010
00010101
00001110
00000001
10010101
00110111
01101001
00011100
01011011
10111011
10011001
00000110
11100101
10001000
00000011
00001010
11111010
10101001
01000110
01111000
00011111
11111001
01000101
00010100
00101000
10010011
00101101
11110011
00100010
00000001
00100100
10100100
10011111
00100000
11100111
00001111
11101011
10111110
11111101
01000010
01100111
01001010
00000000
11010010
01001110
11001100
00001010
01110010

stdout

10000100100111011101000101000011000101100100101111

stderr

strace