example.escheme 405 B

1234567891011121314151617181920212223242526
  1. <%
  2. (let ((user "Erubis")
  3. (items '("<aaa>" "b&b" "\"ccc\""))
  4. (i 0))
  5. %>
  6. <p>Hello <%= user %>!</p>
  7. <table>
  8. <tbody>
  9. <%
  10. (for-each
  11. (lambda (item)
  12. (set! i (+ i 1))
  13. %>
  14. <tr bgcolor="<%= (if (= (modulo i 2) 0) "#FFCCCC" "#CCCCFF") %>">
  15. <td><%= i %></td>
  16. <td><%= item %></td>
  17. </tr>
  18. <%
  19. ) ; lambda end
  20. items) ; for-each end
  21. %>
  22. </tbody>
  23. </table>
  24. <%
  25. ) ; let end
  26. %>