You are looking at a very old, but free version of the course.
If you are interesed the most recent version, check it out
on the Perl Maven site.
The same computation but we expect the wrong value ...
This is not that clever but I could not find a real bug in bc to show here as an example and
I'd like to show what happens when the computation fails.
Example 7-3. examples/bc/bc3.pl
my $e = Expect->new;
$e->spawn("bc") or die "Cannot run bc\n";
$e->expect(1, "warranty") or die "no warranty\n";
$e->expect(1, 29) or die "no sum\n";
If you are interested in on-site trainings by the author, please
contact me directly.