> do
> 
>       s%([A-Z]+)([BE])%<${\(($2 eq 'E')?'/':'')}$1>%g
> 
> on that and you've almost got XML!

<comment language="en" encoding="iso-8859-1">
 <sentence>
  <subject>XML</subject>
  <verb>is</verb>
  <adverb>much</adverb>
  <adverb>too</adverb>
  <object>verbose</adverb>
  <punctuation>.</punctuation>
 </sentence>
</comment>

-- 
$jhi++; # http://www.iki.fi/jhi/
        # There is this special biologist word we use for 'stable'.
        # It is 'dead'. -- Jack Cohen

Reply via email to