The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
Changes 05
MANIFEST 01
META.json 11
META.yml 11
Makefile.PL 11
README 11
lib/Net/CLI/Interact/Action.pm 22
lib/Net/CLI/Interact/ActionSet.pm 22
lib/Net/CLI/Interact/Logger.pm 22
lib/Net/CLI/Interact/Manual/Phrasebook.pod 010
lib/Net/CLI/Interact/Phrasebook.pm 22
lib/Net/CLI/Interact/Role/Engine.pm 22
lib/Net/CLI/Interact/Role/FindMatch.pm 11
lib/Net/CLI/Interact/Role/Iterator.pm 22
lib/Net/CLI/Interact/Role/Prompt.pm 22
lib/Net/CLI/Interact/Transport/Base.pm 22
lib/Net/CLI/Interact/Transport/Loopback.pm 22
lib/Net/CLI/Interact/Transport/Platform/Unix.pm 11
lib/Net/CLI/Interact/Transport/Platform/Win32.pm 11
lib/Net/CLI/Interact/Transport/Role/ConnectCore.pm 11
lib/Net/CLI/Interact/Transport/SSH.pm 22
lib/Net/CLI/Interact/Transport/Serial.pm 22
lib/Net/CLI/Interact/Transport/Telnet.pm 22
lib/Net/CLI/Interact/Transport/Wrapper/Base.pm 11
lib/Net/CLI/Interact/Transport/Wrapper/IPC_Run.pm 11
lib/Net/CLI/Interact/Transport/Wrapper/Net_Telnet.pm 11
lib/Net/CLI/Interact/phrasebook/ovmcli/pb 010
lib/Net/CLI/Interact/phrasebook/unix/bash/pb 22
lib/Net/CLI/Interact.pm 22
t/author-20_sdf_shell.t 11
30 files changed (This is a version diff) 4066
@@ -1,3 +1,8 @@
+2.143070  2014-11-03 20:43:12 Europe/London
+
+  * [#14] Allow square brackets in bash prompts (M. Perry)
+  * [#15] Add phrasebook for Oracle VM Manager CLI (M. Perry)
+
 2.142720  2014-09-29 19:41:26 Europe/London
 
   * [#13] Fix cmd in scalar context appends a newline
@@ -39,6 +39,7 @@ lib/Net/CLI/Interact/phrasebook/cisco/pb
 lib/Net/CLI/Interact/phrasebook/cisco/pixos/fwsm/fwsm3/pb
 lib/Net/CLI/Interact/phrasebook/cisco/pixos/pb
 lib/Net/CLI/Interact/phrasebook/cisco/pixos/pixos7/pb
+lib/Net/CLI/Interact/phrasebook/ovmcli/pb
 lib/Net/CLI/Interact/phrasebook/unix/bash/pb
 lib/Net/CLI/Interact/phrasebook/unix/csh/pb
 lib/Net/CLI/Interact/phrasebook/unix/csh/sdf/pb
@@ -59,6 +59,6 @@
          "web" : "https://github.com/ollyg/Net-CLI-Interact"
       }
    },
-   "version" : "2.142720"
+   "version" : "2.143070"
 }
 
@@ -36,4 +36,4 @@ resources:
   bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=Net-CLI-Interact
   homepage: https://github.com/ollyg/Net-CLI-Interact/wiki
   repository: git://github.com/ollyg/Net-CLI-Interact.git
-version: 2.142720
+version: 2.143070
@@ -35,7 +35,7 @@ my %WriteMakefileArgs = (
     'Time::HiRes' => '0',
     'strict' => '0'
   },
-  'VERSION' => '2.142720',
+  'VERSION' => '2.143070',
   'test' => {
     'TESTS' => 't/*.t'
   },
@@ -2,7 +2,7 @@ NAME
     Net::CLI::Interact - Toolkit for CLI Automation
 
 VERSION
-    version 2.142720
+    version 2.143070
 
 PURPOSE
     This module exists to support developers of applications and libraries
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Action;
 {
-  $Net::CLI::Interact::Action::VERSION = '2.142720';
+  $Net::CLI::Interact::Action::VERSION = '2.143070';
 }
 
 use Moo;
@@ -103,7 +103,7 @@ Net::CLI::Interact::Action - Sent data or matched response from connected device
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::ActionSet;
 {
-  $Net::CLI::Interact::ActionSet::VERSION = '2.142720';
+  $Net::CLI::Interact::ActionSet::VERSION = '2.143070';
 }
 
 use Moo;
@@ -177,7 +177,7 @@ Net::CLI::Interact::ActionSet - Conversation of Send and Match Actions
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Logger;
 {
-  $Net::CLI::Interact::Logger::VERSION = '2.142720';
+  $Net::CLI::Interact::Logger::VERSION = '2.143070';
 }
 
 use Moo;
@@ -147,7 +147,7 @@ Net::CLI::Interact::Logger - Per-instance multi-target logging, with categories
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 SYNOPSIS
 
@@ -36,6 +36,8 @@ dictionaries it inherits.
  
  Bash      # GNU Bourne-Again SHell (i.e. most linux systems)
 
+ OVMCLI    # Oracle VM Manager CLI
+
 =head1 PERSONALITIES
 
 =head2 Bash
@@ -155,6 +157,14 @@ dictionary.
 
 Additionally it provides the C<paging> Macro to set the terminal page size.
 
+=head2 OVMCLI
+
+This personality goes by the name of C<ovmcli>.
+
+Prompts are C<prompt> and C<privileged>.
+
+There is one macro named C<disconnect>.
+
 =head1 SUPPORTING A NEW DEVICE
 
 In order to support a new device, particularly for the L<Net::Appliance::Session>
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Phrasebook;
 {
-  $Net::CLI::Interact::Phrasebook::VERSION = '2.142720';
+  $Net::CLI::Interact::Phrasebook::VERSION = '2.143070';
 }
 
 use Moo;
@@ -276,7 +276,7 @@ Net::CLI::Interact::Phrasebook - Load command phrasebooks from a Library
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Role::Engine;
 {
-  $Net::CLI::Interact::Role::Engine::VERSION = '2.142720';
+  $Net::CLI::Interact::Role::Engine::VERSION = '2.143070';
 }
 
 {
@@ -192,7 +192,7 @@ Net::CLI::Interact::Role::Engine - Statement execution engine
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Role::FindMatch;
 {
-  $Net::CLI::Interact::Role::FindMatch::VERSION = '2.142720';
+  $Net::CLI::Interact::Role::FindMatch::VERSION = '2.143070';
 }
 
 use Moo::Role;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Role::Iterator;
 {
-  $Net::CLI::Interact::Role::Iterator::VERSION = '2.142720';
+  $Net::CLI::Interact::Role::Iterator::VERSION = '2.143070';
 }
 
 use Moo::Role;
@@ -93,7 +93,7 @@ Net::CLI::Interact::Role::Iterator - Array-based Iterator
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 SYNOPSIS
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Role::Prompt;
 {
-  $Net::CLI::Interact::Role::Prompt::VERSION = '2.142720';
+  $Net::CLI::Interact::Role::Prompt::VERSION = '2.143070';
 }
 
 use Moo::Role;
@@ -157,7 +157,7 @@ Net::CLI::Interact::Role::Prompt - Command-line prompt management
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Base;
 {
-  $Net::CLI::Interact::Transport::Base::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Base::VERSION = '2.143070';
 }
 
 use Moo;
@@ -42,7 +42,7 @@ Net::CLI::Interact::Transport::Base - Spawns an Interactive CLI Session
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Loopback;
 {
-  $Net::CLI::Interact::Transport::Loopback::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Loopback::VERSION = '2.143070';
 }
 
 use Moo;
@@ -57,7 +57,7 @@ Net::CLI::Interact::Transport::Loopback - Testable CLI connection
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DECRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Platform::Unix;
 {
-  $Net::CLI::Interact::Transport::Platform::Unix::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Platform::Unix::VERSION = '2.143070';
 }
 
 use Moo;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Platform::Win32;
 {
-  $Net::CLI::Interact::Transport::Platform::Win32::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Platform::Win32::VERSION = '2.143070';
 }
 
 use Moo;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Role::ConnectCore;
 {
-  $Net::CLI::Interact::Transport::Role::ConnectCore::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Role::ConnectCore::VERSION = '2.143070';
 }
 
 use Moo::Role;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::SSH;
 {
-  $Net::CLI::Interact::Transport::SSH::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::SSH::VERSION = '2.143070';
 }
 
 use Moo;
@@ -107,7 +107,7 @@ Net::CLI::Interact::Transport::SSH - SSH based CLI connection
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Serial;
 {
-  $Net::CLI::Interact::Transport::Serial::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Serial::VERSION = '2.143070';
 }
 
 use Moo;
@@ -102,7 +102,7 @@ Net::CLI::Interact::Transport::Serial - Serial-line based CLI connection
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Telnet;
 {
-  $Net::CLI::Interact::Transport::Telnet::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Telnet::VERSION = '2.143070';
 }
 
 use Moo;
@@ -99,7 +99,7 @@ Net::CLI::Interact::Transport::Telnet - TELNET based CLI connection
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 DESCRIPTION
 
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Wrapper::Base;
 {
-  $Net::CLI::Interact::Transport::Wrapper::Base::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Wrapper::Base::VERSION = '2.143070';
 }
 
 use Moo;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Wrapper::IPC_Run;
 {
-  $Net::CLI::Interact::Transport::Wrapper::IPC_Run::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Wrapper::IPC_Run::VERSION = '2.143070';
 }
 
 use Moo;
@@ -1,6 +1,6 @@
 package Net::CLI::Interact::Transport::Wrapper::Net_Telnet;
 {
-  $Net::CLI::Interact::Transport::Wrapper::Net_Telnet::VERSION = '2.142720';
+  $Net::CLI::Interact::Transport::Wrapper::Net_Telnet::VERSION = '2.143070';
 }
 
 use Moo;
@@ -0,0 +1,10 @@
+# Oracle VM Manager CLI
+
+prompt pass
+    match /password(?: for \w+)?: $/
+
+prompt generic
+    match /OVM> $/
+
+macro disconnect
+    send exit
@@ -5,10 +5,10 @@ prompt pass
     match /password(?: for \w+)?: $/
 
 prompt generic
-    match /\w+@.+\$ $/
+    match /(?:\[)?\w+@.+(?:\])?\$ $/
 
 prompt privileged
-    match /^root@.+# $/
+    match /^(?:\[)?root@.+(?:\])?# $/
 
 macro begin_privileged
     send sudo su -
@@ -1,6 +1,6 @@
 package Net::CLI::Interact;
 {
-  $Net::CLI::Interact::VERSION = '2.142720';
+  $Net::CLI::Interact::VERSION = '2.143070';
 }
 
 use Moo;
@@ -120,7 +120,7 @@ Net::CLI::Interact - Toolkit for CLI Automation
 
 =head1 VERSION
 
-version 2.142720
+version 2.143070
 
 =head1 PURPOSE
 
@@ -12,7 +12,7 @@ use strict; use warnings FATAL => 'all';
 use Test::More 0.88;
 
 BEGIN {
-  Test::More::plan(skip_all => 'SDF login not working');
+#  Test::More::plan(skip_all => 'SDF login not working');
 }
 
 BEGIN { use_ok( 'Net::CLI::Interact') }