$ver =       unpack("n", substr($buf,0,2)); #or s signed 16 bit
$extension = unpack("l", substr($buf,6,4)); # signed 32 bit int