Branch Coverage

blib/lib/Pod/Perldoc/ToTerm.pm
Criterion Covered Total %
branch 0 20 0.0


line true false branch
23 0 0 unless $self->_perldoc_elem('width', @_) or $self->_get_columns_from_manwidth or $self->_get_columns_from_stty
34 0 0 if ($output =~ /\bcolumns\s+(\d+)/) { }
0 0 elsif ($output =~ /;\s*(\d+)\s+columns;/) { }
42 0 0 unless defined $ENV{'MANWIDTH'}
44 0 0 unless ($ENV{'MANWIDTH'} =~ /\A\d+\z/)
49 0 0 if ($ENV{'MANWIDTH'} == 0)
54 0 0 if ($ENV{'MANWIDTH'} =~ /\A(\d+)\z/)
77 0 0 $Pod::Text::VERSION ? :
0 0 @options ? :
0 0 if defined &Pod::Perldoc::DEBUG and 0