The arc challenge using IO.WebServer.js

arc.js

// This server doesn't suffer from the problem
// mentioned in http://arclanguage.org/item?id=1263
// 
// Run by placing this file alongside IO.WebServer.js
// and IO.js and invoking node as -
//    node arc.js
//
// Then visit http://localhost:9000/said in your browser.

var IO = require('./IO.WebServer.js');

var ws = IO.WebServer(9000);

ws.route('/said', wr([
        '<form name="input" action="/click" method="post">',
        '<input type="text" name="blabberings"/>',
        '<input type="submit" value="Submit"/>',
        '</form>'
        ].join('')
        ));

ws.route('/click', IO.do([
            ws.expire(10), // Optional: Expire the session after 10 seconds once you come here. 
            wr(function (W, conn) {
                return '<a href="' + W.link(wr('you said: <b>' + conn.data.blabberings + '</b>')) + '">click here</a>';
            })
            ]));


ws.start();

function wr(x) { 
    return ws.page(ws.write(x)); 
}