| 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 {
&_INSTANCE($it, $_);
}
, @ORDER) |
|
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 |