Since I'm not the master of literate programming (and in fact haven't tried it), and the program is pretty easy to assemble (and is mostly here line by line), I didn't think there is a need.

The working code is available on my scratchpad.

perl -e'$b=unpack"b*",pack"H*","59dfce2d6b1664d3b26cd9969503";\
for(;$a<length$b;$a+=9){print+pack"b8",substr$b,$a,8;}'
[download]