| line |
true |
false |
branch |
|
40
|
0 |
3 |
unless my $handler = &_CLASS(shift())
|
|
41
|
0 |
3 |
unless my $get = &_CODE(shift())
|
|
42
|
0 |
3 |
unless my $set = &_CODE(shift())
|
|
43
|
0 |
3 |
if ($HANDLER{$handler})
|
|
137
|
2 |
0 |
defined $_[0] ? :
|
|
142
|
1 |
1 |
&_SCALAR0($it) ? :
|
|
|
0 |
2 |
unless my $class = &_SCALAR0($it) ? "SCALAR" : &List::Util::first(sub {
|
|
143
|
0 |
2 |
unless my $handler = $HANDLER{$class}
|
|
147
|
0 |
2 |
unless my $Document = &_INSTANCE(scalar $handler->[0]->($it), "PPI::Document")
|
|
149
|
0 |
2 |
unless $self->document($Document)
|
|
150
|
0 |
2 |
unless $handler->[1]->($it, $Document)
|
|
177
|
2 |
0 |
defined $_[0] ? :
|
|
178
|
1 |
0 |
defined $_[0] ? :
|
|
|
1 |
1 |
@_ ? :
|
|
|
0 |
2 |
unless my $output = @_ ? defined $_[0] ? "$_[0]" : undef : $input
|
|
181
|
0 |
2 |
unless my $Document = "PPI::Document"->new("$input")
|
|
182
|
0 |
2 |
unless $self->document($Document)
|
|
211
|
0 |
4 |
if ref $_[0]
|
|
212
|
0 |
4 |
unless my $self = $_[0]->new
|