wish < tcl/Effects.tcl | ./effects -ip