note
Errto
<p>Assuming you are starting with a bit string <code>$str</code> and want to end up with an array of bit strings <code>@arr</code>, I would try:</p>
<code>my @arr = map { pack "b6" } unpack "A6"x16, unpack "b96", $str;</code>
<p>I'm not sure how best to test the efficiency of that.</p>
<p><strong>Update</strong>: [tye]'s explanation is most likely to be more accurate. I was just taking a stab.</p>
383837
383837