Home/ Questions/Q 8557683
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-06-11T15:37:47+00:00

I have a problem with Net::Appliance::Session. I created a session, executed my command. After

  • 0

I have a problem with Net::Appliance::Session. I created a session, executed my command. After execution it prompts me some question (yes/no). I want to answer it but didn’t find a way how to do it. Below you can see my trials:

$session->cmd($command);
$session->waitfor(Match=>'/.*yes*/');
$session->print("no");
$session->waitfor(Match=>'');
$session->print("y");

I don’t know where is the problem. Accoding to CPAN documentations Net::Telnet have the method waitfor. But Session documentation tells that we can use waitfor(). Another thing said there is that the method “cmd” have a member Match which includes all the features of waitfor(). So I changed my code like below:

$session->cmd($command, Match=>'/.*yes*/');
$session->print("no");

Executing this reports below error:

Odd number of elements in hash assignment at
/usr/lib/perl5/vendor_perl/5.8.8/Net/Appliance/Session.pm line 245.

Is there any idea how can I do that? And why am I getting this error message?

Thanks in advance..

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    From the Net::Appliance::Session page at meta::cpan

    To handle more complicated interactions, for example commands which prompt for confirmation or optional parameters, you should use a Macro. These are set up in the phrasebook and issued via the $s->macro($name) method call. See the Phrasebook and Cookbook manual pages for further details.

    So you set up a macro (scripted call and response) in a phrasebook, and then tell your session to use that macro.

    • 0