|b|
b := HTML::TreeBuilder new.
b
html;
head;
headEnd;
body;
table;
tr;
td; text:'hello'; tdEnd;
td; text:'world'; tdEnd;
trEnd;
tableEnd;
bodyEnd;
htmlEnd.
b htmlString inspect.
|b|
b := HTML::TreeBuilder new beginWith:(Document new).
b
head;
headEnd;
body;
table;
tr;
td; tdEnd;
td; tdEnd;
trEnd;
tableEnd;
bodyEnd.
b rootElement inspect.
b htmlString inspect.
|b|
b := HTML::TreeBuilder new.
b
span;
table;
tr;
td; tdEnd;
td; tdEnd;
trEnd;
tableEnd;
spanEnd.
b rootElement inspect.
|b|
b := HTML::TreeBuilder new beginWith:(Body new).
b
textArea;
rawText:'line1';
rawText:'line2';
rawText:'line3';
rawText:'line4
line5
line6';
textAreaEnd.
b rootElement printOn:Transcript.
ST/X 6.1.1; WebServer 1.620 at exept:8081; Mon, 21 May 2012 17:34:03 GMT