Search for my contributions to this Wiki [http://mini.net/tcl/2?wjr*]. ---- Some sites of interest: * O'Neil & Associates, Inc. [http://www.oneil.com]: This is where I work, using open source tools like Tcl/Tk, among others. My primary role at O'Neil is that of UI developer for web and client-side software. * My personal web site [http://jrankin.ath.cx]: I maintain some software packages for Sun Solaris. You can find them here, among other things. ---- Here's a little script that determines the link to the current Astronomy Picture of the Day [http://antwrp.gsfc.nasa.gov/apod/astropix.html]: #!/bin/sh # -*- tcl -*- # The next line is executed by /bin/sh, but not tcl \ exec tclsh "$0" ${1+"$@"} package require http set base_url http://antwrp.gsfc.nasa.gov/apod set site [http::geturl $base_url/astropix.html] set html [http::data $site] regexp -nocase -linestop {(src="(.*)")} $html match src image puts $base_url/$image Here's the same thing as a [TclHttpd] template ('''Note:''' You'll want to have a 'package require http' in this template or in the .tml file): [ Doc_Dynamic set base_url http://antwrp.gsfc.nasa.gov/apod set template astropix.html set site [http::geturl $base_url/$template] set html [http::data $site] regexp -nocase -linestop {(src="(.*)")} $html match src image return ]

APOD

---- '''Some pages I've started, or plan on starting:''' * [TclHttpd RSS Processing] * [Simple Chaos Theory with Tcl] * [Generating Accessible HTML] * [TclHttpd as a Windows Service] * [TclHttpd: The .tml File] * [Using TclHttpd with IIS] * [Using TclHttpd with Apache] * [Using TclHttpd with iocpsock] * [Bugdb: A TclHttpd Sample Application] ---- Could you add a way to contact you? Sure, my email is mailto:jrankin@oneil.com ---- [Category Person] | [Category Home Page]