Be concise.
Be useful.
All contributions dictatorially edited by webmasters to match personal tastes.
Please do not paste any copyright violating material.
Please try to avoid dependencies to third-party libraries and frameworks.
for b in a do b := random(256);
my $n = 20;
my $bytestring;
foreach my $i (0 .. $n*8 - 1) {
vec($bytestring, $i, 1) = rand(2);
}