| line |
true |
false |
branch |
|
35
|
3 |
115 |
ref $options eq 'HASH' ? : |
|
|
2 |
118 |
ref $self ? : |
|
48
|
3 |
218 |
unless my $self = $class->_resolve_new($stuff, $options) |
|
51
|
1 |
217 |
if $options->{'indent'} |
|
61
|
1 |
220 |
unless defined $stuff |
|
63
|
114 |
106 |
if (&blessed($stuff)) |
|
64
|
64 |
50 |
if $stuff->isa('HTML::Element') |
|
67
|
1 |
49 |
if $stuff->isa('URI') |
|
70
|
49 |
0 |
if $stuff->isa($class) |
|
76
|
1 |
105 |
if ref $stuff eq 'ARRAY' |
|
78
|
5 |
100 |
if $stuff =~ m[^(?:https?|file)://] |
|
80
|
91 |
9 |
if $stuff =~ /<.*?>/ |
|
82
|
9 |
0 |
if CORE::not $stuff =~ /\n/ and -f $stuff |
|
92
|
3 |
3 |
unless $RESPONSE->is_success |
|
112
|
118 |
1 |
ref $_ ? : |
|
122
|
556 |
37 |
ref $_[0] eq 'ARRAY' ? : |
|
169
|
0 |
147 |
ref $selector ? : |
|
180
|
1 |
9 |
if ($selector) |
|
181
|
0 |
1 |
ref $selector ? : |
|
196
|
1 |
63 |
$_->isa('HTML::TreeBuilder::XPath::TextNode') || $_->isa('HTML::TreeBuilder::XPath::CommentNode') ? : |
|
|
64 |
2 |
ref $_ ? : |
|
199
|
10 |
42 |
if defined $args{'join'} |
|
201
|
11 |
31 |
wantarray ? : |
|
207
|
2 |
23 |
if (@_) |
|
222
|
25 |
10 |
ref $_ ? : |
|
226
|
9 |
14 |
wantarray ? : |
|
232
|
1 |
43 |
if (@_) |
|
238
|
41 |
2 |
ref $_ ? : |
|
240
|
3 |
40 |
wantarray ? : |
|
246
|
33 |
17 |
if (@_ == 1) |
|
249
|
5 |
28 |
wantarray ? : |
|
254
|
1 |
17 |
ref $value eq 'CODE' ? : |
|
257
|
2 |
19 |
if ($code) |
|
261
|
1 |
1 |
if $orig eq $_ |
|
274
|
4 |
6 |
if (@_) { } |
|
277
|
0 |
4 |
if $self->size == 0 |
|
281
|
1 |
3 |
if ref $new_id eq 'CODE' |
|
283
|
1 |
2 |
if ($self->size == 1) { } |
|
295
|
2 |
4 |
wantarray ? : |
|
313
|
2 |
10 |
$_ eq '~comment' ? : |
|
314
|
9 |
2 |
ref $_ ? : |
|
|
0 |
11 |
ref $_ eq 'HTML::TreeBuilder::XPath::CommentNode' ? : |
|
|
1 |
11 |
ref $_ eq 'HTML::TreeBuilder::XPath::TextNode' ? : |
|
320
|
0 |
12 |
wantarray ? : |
|
353
|
24 |
8 |
if (ref $_[0] eq 'CODE') { } |
|
363
|
0 |
8 |
ref $_[0] ? : |
|
400
|
4 |
5 |
if (ref $rep eq 'CODE') |
|
405
|
7 |
2 |
unless ref $rep |
|
412
|
8 |
1 |
if ref $r |
|
414
|
8 |
1 |
if ref $r and $node->parent |
|
419
|
1 |
4 |
if ref $replacement eq (ref $self || $self) |
|
504
|
2 |
8 |
ref $class eq 'CODE' ? : |
|
508
|
14 |
2 |
unless $current_class =~ /(?:^|\s)$_(?:\s|$)/ |
|
527
|
0 |
10 |
unless defined $current_class |
|
529
|
2 |
8 |
ref $class eq 'CODE' ? : |
|
550
|
6 |
6 |
$_->has_class($class) ? : |
|
561
|
14 |
15 |
if $t->attr('class') =~ /(?:^|\s)$class(?:\s|$)/ |
|
578
|
1 |
28 |
if (@stuff == 2 and CORE::not ref $stuff[0] and $stuff[1]->isa('HTML::Element')) { } |
|
579
|
0 |
1 |
ref $stuff[0] ? : |
|
585
|
2 |
27 |
if $_->{'need_delete'} |
|
623
|
0 |
26 |
ref $selector ? : |
|
627
|
0 |
30 |
unless ref $e |
|
631
|
1 |
25 |
wantarray ? : |
|
639
|
0 |
19 |
ref $selector ? : |
|
676
|
9 |
15 |
if ($e->match($selector)) { } |
|
681
|
6 |
9 |
if ($current[1]) { } |
|
691
|
1 |
2 |
if ($args{'skip_leading'}) |
|
695
|
1 |
2 |
unless ($args{'pairs'}) |
|
707
|
474 |
119 |
unless $_[0]{'need_delete'} |