queuemon-test Fail

[Xin Wang <xwang@dnrc.bell-labs.com>]

When I tried to test the queuemon-test.tcl, I got the following error
messages.
Obviously it is looking for variable source_. But where shall I feed
this variable into the test code?
Anyone met the same problem before?

I got the following ns: _o18 queue-sample-timeout: can't read "source_":
no such variable
    while executing
"$source_ id"
    (procedure "_o18" line 7)
    (SimpleLink queue-sample-timeout line 7)
    invoked from within
"_o18 queue-sample-timeout"


Thanks,

Xin