JezK
Edit File: example_scheme_display.result
$ erubis -l scheme --func=display example.escheme (display "<html> <body>\n") (let ((user "Erubis") (items '("<aaa>" "b&b" "\"ccc\"")) (i 0)) (display " <p>Hello ")(display user)(display "!</p> <table>\n") (for-each (lambda (item) (set! i (+ i 1)) (display " <tr bgcolor=\"")(display (if (= (modulo i 2) 0) "#FFCCCC" "#CCCCFF"))(display "\"> <td>")(display i)(display "</td> <td>")(display item)(display "</td> </tr>\n") ) ; lambda end items) ; for-each end (display " </table>\n") ) ; let end (display " </body> </html>\n")