in reply to Re: Need help on expect
in thread Need help on expect

Thanks for your replies, I somehow not able to search the below

Can not install pack when NetBackup daemons are running.

"<TAB space>" Do you want to kill all NetBackup daemons? y,n (y)

using the below
[ qr/Do you want to kill all NetBackup daemons\? \[y,n\] \(y\)\s+/ => +sub { $exp->send("\r"); exp_continue; } ],
Please let me know if I am searching it wrong.

Replies are listed 'Best First'.
Re^3: Need help on expect
by Anonymous Monk on Feb 23, 2015 at 15:44 UTC

    Without knowing the output of the program you're working with, this is just a guess, but perhaps your regex doesn't need to be so specific, and something like qr/Do you want to kill all NetBackup daemons\?/ might be enough?

      Thanks all, it has been fixed and my perl script is working as expected.