| line |
l |
!l&&r |
!l&&!r |
condition |
|
7
|
0 |
0 |
0 |
$_[0]{'auto'} //= $OptArgs2::Pager::_HAS->{'auto'}{'default'} |
|
|
0 |
0 |
0 |
$_[0]{'encoding'} //= $OptArgs2::Pager::_HAS->{'encoding'}{'default'} |
|
|
0 |
0 |
0 |
$_[0]{'fh'} //= $OptArgs2::Pager::_HAS->{'fh'}{'default'}->($_[0]) |
|
|
0 |
0 |
0 |
ref $class || $class |
|
|
0 |
0 |
0 |
$_BUILD_CHECK{$class} //= do {
my(@possible) = $class;
my(@BUILD, @CHECK);
while (@possible) {
no strict 'refs';
my $c = shift @possible;
push @BUILD, $c . "::BUILD" if exists &{$c . "::BUILD";};
push @CHECK, $c . "::__CHECK" if exists &{$c . "::__CHECK";};
push @possible, @{$c . "::ISA";};
} ;
[reverse(@CHECK), reverse(@BUILD)]
} |
|
|
0 |
0 |
0 |
$_[0]{'orig_fh'} //= $OptArgs2::Pager::_HAS->{'orig_fh'}{'default'}->($_[0]) |
|
|
0 |
0 |
0 |
$_[0]{'pager'} //= $OptArgs2::Pager::_HAS->{'pager'}{'default'}->($_[0]) |