128 bits by scottg

$y="\xc0\x88Vc\xc5VA\xd8[\xe3t\x9d\x02\x11\xf9\x09";
print unpack("B8",$x)." "while($x=chop($y));

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page