Parent Directory | Revision Log
including openisis 0.9.0 into webpac tree
1 | #!/opt/openisis/tcl/bin/tspr |
2 | <%-- |
3 | test Tcl server page |
4 | $Id: test.tsp,v 1.2 2003/04/28 16:05:23 kripke Exp $ |
5 | --%><%! |
6 | proc foo {bla} { # proc with embedded literals |
7 | !%> |
8 | foo: <b><%=bla%></b> |
9 | <%! |
10 | };#foo |
11 | %><% |
12 | # preset record |
13 | openIsisRec v |
14 | v add 24 Foo 25 bar^abaz |
15 | %><html> |
16 | <head> |
17 | </head> |
18 | <body> |
19 | hello ISIS! |
20 | this goes |
21 | <% |
22 | for {set i 1} {$i < 4} {incr i} { |
23 | %> <i><%=i%></i> <% |
24 | } |
25 | %> |
26 | HOME is <%=::env(HOME)%> <%-- variable --%> |
27 | 2+2 is <%=expr 2+2%> <%-- command --%> |
28 | v24 is <%=24%> <%-- field --%> |
29 | <% foo bar %> <%-- procedure --%> |
30 | <%=request serialize%> |
31 | </body> |
32 | </html> |
Name | Value |
---|---|
svn:executable |
ViewVC Help | |
Powered by ViewVC 1.1.26 |