awk, 105 bytes

Result [link]

WA

Code [DL]

func b(i, t,a,c){a=1;for(c=length(i);c>0;c--){t+=substr(i,c,1)=="1"?a:0;a*=2}return t}{printf "%d",b($0)}

stdin

1000111000100000110000001111001010111110011110011110000010011111110101100111000011010111010011101111

stdout

703783491088971077313519157248

stderr

strace