|
NAMENet::CLI::Interact::Manual::Tutorial - Guide for new usersIntroductionAutomating command line interface (CLI) interactions is not a new idea, but can be tricky to implement. Net::CLI::Interact aims to provide a simple and manageable interface to CLI interactions, supporting:
The module exists to support developers of applications and libraries which must interact with a command line interface. The SYNOPSIS section of Net::CLI::Interact has an overview of the commands demonstrated in this document. Getting StartedLike many other Perl modules, you need to load the module and then create a new Net::CLI::Interact instance (which is $s in the example, below):use Net::CLI::Interact; my $s = Net::CLI::Interact->new({ transport => 'Serial', personality => 'cisco', }); Your application can have multiple independent instances (that is, connect to different devices at the same time); simply repeat the above example more times for variables other than $s. Note that at the time you create the instance, as in the example above, the module does not connect to the device. That comes later. There were two options provided to the "new" call, above, both of which are required for all new instances. Let's look at them in turn:
ConnectingThis is done automatically for you the first time you send a command to the device, so skip this step and move on!Sending CommandsBut first, PromptsThe idea of sending a command is, usually, to see some output. The most important part of this process is knowing when the output has all been sent, otherwise the module would sit forever, waiting to gather more text!Between each command sent, the connected device prints a CLI Prompt. This prompt is where you type commands, and it's what tells us that all the output has been sent from our last command. Prompts are loaded in the phrasebook, and given friendly names. If your personality's phrasebook is sufficiently mature, then the prompts might be fully automated, and just like the Connecting step above, you can skip doing anything manually. Consult the Phrasebook user guide for details. However if you need to set it manually, do the following: $s->set_prompt('friendly_name'); Sometimes you might not know what state the CLI is in; typically this applies to Serial lines. In that case you can ask to find the matching prompt: $s->find_prompt($wake_up); This method gets some output from the connected session and then tries to match it against any loaded prompts, returning if successful. If not successful, and the $wake_up value is non-zero, then "find_prompt" will "hit the return key" to try to get some output. This process is retried according to the value of $wake_up (i.e. 1, 2, 3, etc), and of not successful will die. Literal CommandsThere's not a lot to it. Remember that with a mature personality loaded, you were probably able to skip the previous prompt step and go straight to:my $output = $s->cmd('show ip interfaces brief'); Here you will get all the output from the command together in one variable, $output. If you prefer an array where each item is one line of output, simply use @output instead in the above example. MacrosLife gets more complicated when your command has things like confirmation steps (e.g. reboot), other prompts (e.g. extended ping), etc. For these situations we have Macros in the phrasebook.A macro is simply a sequence of commands we could issue using "$s->cmd()", bundled together and given a friendly name. Macros are also smart enough either to handle simple confirmation steps themselves, or to allow you to pass in parameters. Some examples probably help: # saves config, accepting the default "startup-config" when prompted $s->macro('write_mem'); # logs in, passing a username and password at the prompts $s->macro('to_user_exec', { params => ['my_username', 'my_password'], }); # simply a parameterized command $s->macro('show_interfaces_x', { params => ['GigabitEthernet 3/4'], }); Slurping OutputAs mentioned above, output at the CLI is often "paged" with the user hitting Space or Return to show the next page. Most macros can deal with this automatically if well implemented.If the Phrasebook user guide says your personality has a named default Continuation for handling paged output, then set it like so: $s->set_default_continuation('friendly_name'); DisconnectingThis is nothing more fancy than issuing the appropriate CLI commands to close the network connection. In the case of the Serial line transport you can usually only log out, and not fully disconnect. Simply end your application and the module will tidy things up as best it can.
Visit the GSP FreeBSD Man Page Interface. |