tag←{
     ⍺←'p'
     0∊⍴⍵:''
     (tg style)←{⎕ML←1
         ' '∊⍵:⍵{(⍵↑⍺)(⍵↓⍺)}¯1+⍵⍳' '
         ⍵''}⍺
     '<',tg,style,'>',(('<'=1⍴⍵)/nl),⍵,'</',tg,'>',nl
 }

     ∇ CreateHtml;htmlCode;body;head
[1]    body←'body'tag('h1'tag'"Hello World with APL in HTML'),('h2'tag'hello...'),tag'...wor
[2]    head←'head'tag('title'tag'Hello world with APL'),(''tag'')
[3]    htmlCode←'html'tag head,body
[4]    htmlCode{(⎕NUNTIE ⍵){}⍺ ⎕NAPPEND ⍵}'helloworld.html'⎕NCREATE 0
     ∇

attachment:helloworld.html

CategoryHelloWorld CategoryDyalog