wish < tcl/EGuitar.tcl | ./eguitar -or -ip