@r = unpack "i30" , $doc;
print join (",",@r);
----
-535703600,-518344287,0,0,0,0,196670,655358,6,0,0,1,56,0,4096,58,1,-2,0,55,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1