XML/Output: Difference between revisions
m
→{{header|Mathematica}}
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 > Tam and <= Emily</Character>
|