> 8).\chr($length).$str; } return \pack('CN', 0xdb, $length).$str; } }