...
$parser = XML::LibXML->new;
$dom = $parser->parse_file("cameras.xml") or die;
@Data = $dom->getElementsByTagName("Data");

# Aufbau des Teilbaums
# camera
$camera_elem   = $dom->createElement("camera"); # camera-Element wird erstellt
$camera_elem->setAttribute('cname',$cname);     # cname wird als Attribut gesetzt

# cam_id
$cam_id_elem = $dom->createElement("cam_id");   # cam_id-Element wird erstellt
$cam_id_tn = $dom->createTextNode($cam_id);     # cam_id-textnode mit der Kamera-ID wird erstellt
$cam_id_elem->appendChild($cam_id_tn);          # Der Textnode wird dem cam_id-Element hinzugefuegt

# start
$start_elem = $dom->createElement("start");
$start_tn = $dom->createTextNode($start);
$start_elem->appendChild($start_tn);


$camera_elem->appendChild($cam_id_elem);       # cam_id-Element wird dem camera-Element hinzugefügt                     
$camera_elem->appendChild($start_elem);         # start-Element wird dem camera-Element hinzugefügt
$Data[0]->appendChild($camera_elem);                 

$dom_string = $dom->toString();
...