egghelp/eggheads community

Case Structure Equivalent?

2007-07-19T20:41:22-04:00

Statistics: Posted by Alchera — Thu Jul 19, 2007 8:41 pm

Case Structure Equivalent?

2007-07-19T19:22:03-04:00

What is an Eggdrop? This is a forum specifically for Eggdrop Tcl scripting but of course other Tcl related help requests are welcome

Statistics: Posted by Sir_Fz — Thu Jul 19, 2007 7:22 pm

Case Structure Equivalent?

2007-07-19T18:46:47-04:00

Well, if you're coding for eggdrop, you'll have to use several procs and bindings, each triggering and handling each step: ie, one proc to ask the user for input, and another for handling the response.

I'm not real sure what eggdrop is... sorry! Your guidance in tcl/expect scripting was helpful though ...

I get the user response via this code

Code:

send_user "What file would you like to push? Press 1 for file1, 2 for file2 or 3 for both: "expect_user -re "(.*)\n" {set FILE $expect_out(1,string)}

then I setup the switch as you outlined:

Code:

switch $FILE {  1 { lots of commands }  2 { lots of commands }  3 { lots of commands }}

One the user enters a number 1-3, and it's saved to the $FILE variable, it seems to work with switch to jump to the appropriate code.

Thanks for your help... it's definitely a big learning curve when going from shell scripting to tcl.

Statistics: Posted by earnstaf — Thu Jul 19, 2007 6:46 pm

Case Structure Equivalent?

2007-07-19T18:39:20-04:00

Well, if you're coding for eggdrop, you'll have to use several procs and bindings, each triggering and handling each step: ie, one proc to ask the user for input, and another for handling the response.

Statistics: Posted by nml375 — Thu Jul 19, 2007 6:39 pm

Case Structure Equivalent?

2007-07-19T18:39:22-04:00

Roughly something like this:
Code:
switch $file { 1 {command 1} 2 {command 2} 3 - 4 {command for 3 or 4} default {any other command}}
Also check the manual for switch for more info/hints...

Thanks nml. That looks like exactly what I need.

How do I prompt the user to enter the 1, 2 or 3? Is it something like this?

Code:

send_user "What file would you like to push? Press 1 for file1, 2 for file2 or 3 for both: "expect_user -re "(.*)\n" {set FILE $expect_out(1,string)}

Seems to be working the way I have it setup.. if there is a better way, please let me know.

Thanks.

Statistics: Posted by earnstaf — Thu Jul 19, 2007 6:21 pm

Case Structure Equivalent?

2007-07-19T17:33:37-04:00

Roughly something like this:

Code:

switch $file { 1 {command 1} 2 {command 2} 3 - 4 {command for 3 or 4} default {any other command}}

Also check the manual for switch for more info/hints...

Statistics: Posted by nml375 — Thu Jul 19, 2007 5:33 pm

Case Structure Equivalent?

2007-07-19T17:26:15-04:00

Hi all,
I'm very new to tcl/expect and I'm looking for a push in the right direction on this issue. I'm writing an expect script to log into a router and push a file that varies. I was thinking of using something like a case structure in shell scripting:

Code:

echo -n "What file would you like to push? Press 1 for file1, 2 for file2 or 3 for both: "; read filecase $file in  1) [i]expect and send commands for file1[/i] ;;  2) [i]expect and send commands for file2[/i];;  3) etc...esac

Is there an efficient way to do this with expect/tcl? Or can I write the script as a shell script, call the Expect script and use the shell variables within the expect script?

Thanks for any guidance you can provide.

Statistics: Posted by earnstaf — Thu Jul 19, 2007 5:26 pm