by@yamayu832
WA
say sqrt(oct("0b".$_)*8+1)%2-1?0:1 while<>
10111110 00100011 00010101 01011011 10011101 01000001 01011000 11111000 10101011 11010100 11010011 11111101 00000000 00101010 00101101 01100100 00000110 00110110 00001010 11100111 00000001 00001111 00001111 01000010 00011100 01011010 01101001 01010000 10101001 00110111 01110010 11010010 10101110 10000011 11000010 00000011 10001000 01100010 10111111 01001110 00001010 01110111 11111011 00011000 01111000 00001110 10111101 10100101 00100100 10011001
syntax error at /volume/CODE line 1, near "say sqrt" Execution of /volume/CODE aborted due to compilation errors.