RosettaCodeData/Task/XML-Input/HicEst/xml-input.hicest
2023-07-01 13:44:08 -04:00

4 lines
138 B
Text

CHARACTER in*1000, out*100
READ(ClipBoard) in
EDIT(Text=in, SPR='"', Right='<Student', Right='Name=', Word=1, WordEnd, APpendTo=out, DO)