$datum{$objectname}{$propertyname}=$propertyvalue;
$datum{$objectname}{$attributename}=(($attr)?1:0);