pack($TEMP, "V", sprintf("%12s", "$string"));