This will do it:
#!/usr/local/bin/expect -f
#exp_internal 1 #<--- you
could uncomment this to turn debug mod on
set timeout 2
set prompt "(%|#|\\$) $";# default prompt
log_user 1
catch {set prompt $env(EXPECT_PROMPT)}
eval spaw
Title: Glacier
I
am developing the text file browser for the file of size > 100MB. "less" Unix
command is pager for doing the same . I am developing the GUI interface for the
same.
I
am using the Expect/ TCL/ TK to build the GUI for the unix command "less". In
"less", 'f' key forwards th