XML/Output: Difference between revisions

m
mNo edit summary
Line 1,843:
</CharacterRemarks></lang>
 
=={{header|Mathematica}}/{{header|Wolfram Language}}==
Some tricky input with the second remark
<lang Mathematica>c = {"April", "Tam O'Shanter","Emily"};
r = {"Bubbly:I'm > Tam and <= Emily" ,
StringReplace["Burns:\"When chapman billies leave the street ...\"", "\"" -> ""], "Short & shrift"};
 
ExportString[ XMLElement[ "CharacterRemarks", {},
{XMLElement["Character", {"name" -> c[[1]]}, {r[[1]]}],
Line 1,854 ⟶ 1,853:
XMLElement["Character", {"name" -> c[[3]]}, {r[[3]]}]
}], "XML", "AttributeQuoting" -> "\""]</lang>
{{out}}
 
<pre><CharacterRemarks>
<Character name=\"April\">Bubbly:I'm &gt; Tam and &lt;= Emily</Character>
1,111

edits