Personaly I am dissapionted that there are no spaces and no linefeed at the end.

Compiled this c program and type "cat data | prog". Of course this assumes that you corredtly recorded all of the yeses (1) and noes (0).

Hint: bytes are delimited by commas.

#include

char pow[8] = {0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01};

int main(void) {
char byte = 0;
int i = 0;
char c;

$ cat nitrozac-binary-secret-decoder-ring

<foo perl -e '$s=""; while (<> ) {$s .= $_;} $s =~ s/[^01]//g; while ($s ne "") { print pack ("B8", $s); substr($s,0,8) = ""; } print "\n";'

Sorry to disappoint you though on the lack of spaces. It is just a quirk of the way Richard speaks his binary, ...his own dialect, so to speak.

He speaks commas between the binary yes/noes, which is his way of helping out the listener a bit ;-)

However, I got just "SoonIwllbeyourboss!" (missing "i" in there). Must have been a transcription error, but I got the idea.

Eric

I was poking around the perl manpages to try to figure it out. I was *this close* to the answer (rather more perlishly, "one way of doing it" ) before I gave up and looked in the forum. You'd already done what I was trying to do.

I was rather embarassed about wasting an hour of my time doing this but then I thought, to hell with that - say it loud, I'm a geek and I'm proud.

--Paul Winkler

#!/usr/bin/env python
import string
def bits_to_int(somestring):
    somestring = `somestring` # make sure
    somestring = string.replace(somestring, "'", "")
    somestring = string.strip(somestring)
    result = 0
    for i in range(len(somestring)):
        # we want to go from right to left
        position = (i * -1) - 1
        if int(somestring[position]):
            result = result + (2 ** i)
    return result

data = [
    '01010011',
    '01101111',
    '01101111',
    '01101110',
    '01001001',
    '01110111',
    '01101001',
    '01101100',
    '01101100',
    '01100010',
    '01100101',
    '01111001',
    '01101111',
    '01110101',
    '01110010',
    '01100010',
    '01101111',
    '01110011',
    '01110011',
    '00100001'
    ]

for s in data:
    print "%c" % bits_to_int(s),

    for i in range(len(somestring)):
        # we want to go from left to right 
        if int(somestring[i]):
            result = result * 2 + 1
        else
            result = result * 2
    return result