my @FIELDS = unpack('x9a4x10a8', $record);