Бредjoin()?
$data = '';
for ($i = 0, $size = count($arr); $i < $size; $i+=4)
$data .= pack("c*", $arr[$i], $arr[$i+1], $arr[$i+2], $arr[$i+3]);
$str = '';
$size = sizeof($arr);
do{
$str .= pack('c*', $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++], $arr[$i++] );
}while( $i < $size );
$s='';
do{$s.=current($arr);}while(next($arr));
Бред$s.=current($arr)