diff --git a/scriptlib/hello.tcl b/scriptlib/hello.tcl
new file mode 100644
index 00000000..6274cc97
--- /dev/null
+++ b/scriptlib/hello.tcl
@@ -0,0 +1,3 @@
+puts stdout "hello on stdout"
+puts stderr "hello on stderr"
+
diff --git a/scriptlib/showargs.tcl b/scriptlib/showargs.tcl
index 01003326..25bb97ec 100644
--- a/scriptlib/showargs.tcl
+++ b/scriptlib/showargs.tcl
@@ -1,32 +1,7 @@
-puts -nonewline stdout "info script\r\n"
-puts stdout "[info script]"
+#puts -nonewline stdout "info script\r\n"
+#puts stdout "[info script]"
 puts stdout "::argc"
 puts stdout $::argc
 puts stdout "::argv"
 puts stdout "$::argv"
-puts stdout "NS"
-puts stdout "[namespace current]"
-
-if {[info exists ::test]} {
-    puts stdout "::test has existing value"
-    puts stdout "$::test"
-}
-
-puts stdout "setting ::test to showargs-ran"
-set ::test "showargs-ran"
-puts stdout "doing basic check of stdin for data"
-chan configure stdin -blocking 0
-set indata ""
-if {![chan eof stdin]} {
-    #set indata [read stdin]
-}
-if {[string length $indata]} {
-    puts stdout "read from stdin:"
-    puts stdout $indata
-} else {
-puts stdout "-no stdin data read-"
-}
-
-
-