Expect::Angel 101

Expect::Angel is a Perl module to build up a robust connection to your DUT.

SYNOPSIS

 use Expect::Angel;
 @ISA = ("Expect::Angel");
 sub new {
 my $type = shift;
 my $para = {@_};
 my $conn = $type->build(%$para);
 blah blah blah
 }

If you are looking for a module that can help quickly build up a robust connection to your DUT, then here is the right place!

Angel is just like a messenger between your testing machine, where everyting is perfect like heaven, and DUT (device under test), where exists right and wrong like earth. The messenger must tolerate the errors and disasters occuring on DUT and faithful deliver information to and from the DUT.

Angel is built on Expect.pm module, but hides the complexity of it. With Angel.pm You can easily build an object-oriented module that meets your specific need with the most useful methods inherited from Angel.

Let's take CISCO router as the first example, and I will show another one that simulates a complex DUT scenarios with Linux machine in the package.

 CISCIO Router

Modes: Non-privilege --- (enable) ---> Enable Mode -- (config t) --> Config Mode

  state2 ... ... -----> stateN
 

Product's homepage