TABLE OF CONTENTS
::pwtk::input::scriptPrint
SYNOPSIS
proc ::pwtk::input::scriptPrint {name} {
PURPOSE
Print to stdout the $name script
ARGUMENTS
- name -- name of the script to print.
SOURCE
variable script ::pwtk::ifexist script($name) { print $script($name) } }