perl -e 'print 0100101."\n"'