Re: Need help in Expect Module
$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
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