Branch Coverage

lib/Devel/Trepan/Pod2Text.pm
Criterion Covered Total %
branch 6 20 30.0


line true false branch
22 13 0 eval { do { require Term::ANSIColor; require Pod::Text::Color } } ? :
27 13 0 eval { do { require Pod::Text } } ? :
36 1 1 unless $width
37 2 0 unless $color
41 0 2 if ($color and $Devel::Trepan::Pod2Text::HAVE_TEXT_COLOR) { }
59 0 0 unless $width
60 0 0 unless $color
64 0 0 if ($color and $Devel::Trepan::Pod2Text::HAVE_TEXT_COLOR) { }
75 0 0 unless "=pod\n" eq substr($input_string, 0, 4)
77 0 0 unless "\n=cut\n" eq substr($input_string, -6)