can't read "::argv": no such variable
    while executing
"lindex $::argv 0"
    (in namespace eval "::request::ircclient" script line 5)
    invoked from within
"namespace eval ircclient {
    variable channel \#tcl

    # Pick up a nick from the command line, or default to TclIrc.
    if { [lindex $::argv 0] !..."
    (in namespace eval "::request" script line 10)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)

OUTPUT BUFFER:

#!/usr/bin/env tclsh ## -*- tcl -*- # irc example script, by David N. Welton # $Id: irc_example.tcl,v 1.10 2009/01/30 04:18:14 andreas_kupries Exp $ set scriptDir [file dirname [info script]] package require irc 0.4 namespace eval ircclient { variable channel \#tcl # Pick up a nick from the command line, or default to TclIrc. if { [lindex $::argv 0] != "" } { set nick [lindex $::argv 0] } else { set nick TclIrc } set cn [::irc::connection] # Connect to the server. $cn connect irc.freenode.net 6667 $cn user $nick localhost domain "www.tcl.tk" $cn nick $nick while { 1 } { source [file join $::scriptDir mainloop.tcl] vwait ::ircclient::RELOAD } }