AOLserver and Tcl Crash Course - Revision history

Dossy: outdent code examples

2007-06-16T03:09:39Z

outdent code examples

Dossy: fixup wiki markup

2007-06-16T03:06:16Z

fixup wiki markup

Dossy: added the "hello world" ADP example

2007-06-16T02:54:58Z

added the "hello world" ADP example

Josephbui: Added hello world example

2007-06-15T21:20:41Z

Added hello world example

Sgoguen: /* Draft Outline */

2007-06-12T15:02:55Z

Draft Outline

Sgoguen at 20:17, 11 June 2007

2007-06-11T20:17:39Z

New page

== Draft Outline ==

* ADP Pages
** Hello World
** Tcl Basics
*** Minimalist Syntax
*** Commands, Subcommands (Evaluated and Non-Evaluated)
*** Variables, Arrays
*** Control Structures
** Fetching GET and POST
** Including / Referring to other pages
** Controlling Output
** Talking to MySQL

== Questions ==
* Where does ADP excel?
* What practices should PHP, ASP, JSP developers stop doing?
* How can one use Tcl to write very concise and readable code?
* How does one efficiently separate pages into MVC components if the wanted?

@@ Line 12: / Line 12: @@
 <pre>
-   <% set name [ns_queryget name "world"] %>
+<% set name [ns_queryget name "world"] %>
-   <html>
+<html>
-   <head>
+<head>
-     <title>Hello <%= [ns_quotehtml $name] %>!</title>
+  <title>Hello <%= [ns_quotehtml $name] %>!</title>
-   </head>
+</head>
-   <body>
+<body>
-     <p>Hello <%= [ns_quotehtml $name] %>!</p>
+  <p>Hello <%= [ns_quotehtml $name] %>!</p>
-     <form>
+  <form>
-     <p>Name: <input name="name" value="<%= [ns_quotehtml $name] %>"></p>
+  <p>Name: <input name="name" value="<%= [ns_quotehtml $name] %>"></p>
-     <p><input type="submit" value="Go"></p>
+  <p><input type="submit" value="Go"></p>
-     </form>
+  </form>
-   </body>
+</body>
-   </html>
+</html>
 </pre>
@@ Line 32: / Line 32: @@
 <pre>
-   set name [ns_queryget name "world"]
+set name [ns_queryget name "world"]
-   ns_return 200 text/html "<html>
+ns_return 200 text/html "<html>
-       <head>
+  <head>
-         <title>Hello [ns_quotehtml $name]!</title>
+    <title>Hello [ns_quotehtml $name]!</title>
-       </head>
+  </head>
-       <body>
+  <body>
-         <p>Hello [ns_quotehtml $name]!</p>
+    <p>Hello [ns_quotehtml $name]!</p>
-         <form>
+    <form>
-         <p>Name: <input name="name" value="[ns_quotehtml $name]"></p>
+    <p>Name: <input name="name" value="[ns_quotehtml $name]"></p>
-         <p><input type="submit" value="Go"></p>
+    <p><input type="submit" value="Go"></p>
-         </form>
+    </form>
-       </body>
+  </body>
-       </html>"
+  </html>"
 </pre>

@@ Line 1: / Line 1: @@
-== Draft Outline ==
+{{TOCright}}
-* ADP Pages
+The following is a working draft in progress for an introductory guide to AOLserver and Tcl.
-   # hello-world.adp
+== ADP Pages ==
     <% set name [ns_queryget name "world"] %>
     <html>
@@ Line 19: / Line 25: @@
     </body>
     </html>
-   # hello-world.tcl
+<pre>
-   set form [ns_getform]
+    set name [ns_queryget name "world"]
     ns_return 200 text/html "<html>
-        <head><title>Hello [ns_quotehtml $name]!</title></head>
+        <head>
         <body>
-       Hello [ns_quotehtml $name]!
+         <p>Hello [ns_quotehtml $name]!</p>
-       <form action='hello-world.tcl' method='post'>
+         <form>
-       Name: <input name='name' value='[ns_quotehtml $name]'>
+         <p>Name: <input name="name" value="[ns_quotehtml $name]"></p>
-       <input type='submit'>
+         <p><input type="submit" value="Go"></p>
-       </form>
+         </form>
         </body>
         </html>"
 ** Explain Minimalist Syntax
 *** Commands, Subcommands (Evaluated and Non-Evaluated)
@@ Line 44: / Line 55: @@
 *** if, while, etc.
 *** procedures
-* Fetching GET and POST
 ** Including / Referring to other pages
 ** Controlling Output
@@ Line 53: / Line 66: @@
 == Questions ==
 * Where does ADP excel?
 * What practices should PHP, ASP, JSP developers stop doing?

@@ Line 5: / Line 5: @@
 *** DOSSY: Create this example with very simple Tcl.
     # hello-world.tcl
@@ Line 22: / Line 36: @@
         </body>
         </html>"
 * Tcl Basics

@@ Line 4: / Line 4: @@
 ** Hello <Yourname> - Simple page, user submits form, displays name
 *** DOSSY: Create this example with very simple Tcl.
-** Tcl Basics
-*** Explain Minimalist Syntax
-**** Commands, Subcommands (Evaluated and Non-Evaluated)
+   # hello-world.tcl
-**** Working with variables set, expr
+   set form [ns_getform]
-*** Control Structures
+   set name [string trim [ns_set get $form name]]
-**** if, while, etc.
+   if {$name eq ""} {
-**** procedures
+       set name "world"
-** Fetching GET and POST
 ** Including / Referring to other pages
 ** Controlling Output
@@ Line 24: / Line 44: @@
 * How can one use Tcl to write very concise and readable code?
 * How does one efficiently separate pages into MVC components if the wanted?