Devel::Cover::Truth_Table - Create and manipulate truth tables for coverage objects.
use Devel::Cover::Truth_Table; # $a || $b my $or_tt = Devel::Cover::Truth_Table->new_primitive('or_3', 0, 1, 1); # $c && $d my $and_tt = Devel::Cover::Truth_Table->new_primitive('and_3', 1, 0, 1); # merge contents of $and_tt into right column of $or_tt, to create # $a || ($c && $d) $or_tt->right_merge($and_tt); # get a (sorted) textual representation my @text = $or_tt->sort->text; print "$_\n" foreach @text; __END__ A B C |exp|hit -------------- 0 0 X | 0 |--- 0 1 0 | 0 |--- 0 1 1 | 1 |+++ 1 X X | 1 |+++ --------------
This module provides methods for creating and merging conditional
primitives ($a && $b
, $c || $d
, etc.) into more complex composite
expressions.
Create a new truth table based on one of the built-in primitives, which
are the subclasses of Devel::Cover::DB::Condition. $op
is one of the
following:
and
or &&
with three conditional paths.
or
or ||
with three conditional paths.
or
or ||
with two conditional paths. (i.e., when the right hand
side of the expression is a constant)
xor
with four conditional paths.
@coverage
is a list booleans identifying which of the possible paths
have been covered.
Sorts a truth table (in place) and returns the sorted object.
Format a truth table to an array of strings for printing.
Format a truth table in HTML.
Determines the proportion of possible conditions that have coverage.
Merge entries from $sub_table
into right column of table.
Merge entries from $sub_table
into left column of table.
Devel::Cover
None that I'm aware of...
Version 0.64 - 10th April 2008
Copyright 2002 Michael Carman <mjcarman@mchsi.com>
This software is free. It is licensed under the same terms as Perl itself. The latest version should be available from: http://www.pjcj.net