Re: Need help in Expect Module

2011-02-03 Thread Zaheer Abbas
$exp = new Expect; > $exp->spawn($app) or die "$!\n"; > $exp->expect(15,[ > qr/default/ => > sub { > my $ch = shift; > print $ch "$choice\n"; > exp_continue; >} >

Need help in Expect Module

2011-01-19 Thread Zaheer
Hi, I am trying to automate a cli application that has multiline output. I want to be able to grep for this multi line output as single string using Expect module and send some keys as input. The cli would be something like bash-3.00# /opt/myapp/bin/app register 1) someservername(1) 2) someoptio