my $materialmapping_table_xml = XML::LibXML->createDocument( "1.0", "UTF-8"); my $materialmapping_table_xml_root = $materialmapping_table_xml->createElement("masterdata"); $materialmapping_table_xml->setDocumentElement($materialmapping_table_xml_root); my $materialmapping_item3 = $materialmapping_table_xml->createElement("item3"); $materialmapping_item3->setAttribute(decode('cp1252',$pr_cell_name3->{Val}),$pr3); $materialmapping_item3->setAttribute("pr_family",$family); $materialmapping_table_xml_root->addChild($materialmapping_item3); #### ####