| line |
true |
false |
branch |
|
35
|
3 |
117 |
ref $options eq 'HASH' ? : |
|
|
2 |
120 |
ref $self ? : |
|
48
|
3 |
474 |
unless my $self = $class->_resolve_new($stuff, $options) |
|
51
|
1 |
473 |
if $options->{'indent'} |
|
61
|
2 |
475 |
unless defined $stuff |
|
63
|
268 |
207 |
if (&blessed($stuff)) |
|
64
|
149 |
119 |
if $stuff->isa('HTML::Element') |
|
67
|
2 |
117 |
if $stuff->isa('URI') |
|
70
|
117 |
0 |
if $stuff->isa($class) |
|
76
|
2 |
205 |
if ref $stuff eq 'ARRAY' |
|
78
|
6 |
199 |
if $stuff =~ m[^(?:https?|file)://] |
|
80
|
181 |
18 |
if $stuff =~ /<.*?>/ |
|
82
|
18 |
0 |
if CORE::not $stuff =~ /\n/ and -f $stuff |
|
92
|
3 |
5 |
unless $RESPONSE->is_success |
|
112
|
236 |
1 |
ref $_ ? : |
|
122
|
1190 |
78 |
ref $_[0] eq 'ARRAY' ? : |
|
169
|
1 |
294 |
ref $selector ? : |
|
180
|
2 |
18 |
if ($selector) |
|
181
|
0 |
2 |
ref $selector ? : |
|
196
|
1 |
145 |
$_->isa('HTML::TreeBuilder::XPath::TextNode') || $_->isa('HTML::TreeBuilder::XPath::CommentNode') ? : |
|
|
146 |
2 |
ref $_ ? : |
|
199
|
20 |
85 |
if defined $args{'join'} |
|
201
|
22 |
63 |
wantarray ? : |
|
207
|
4 |
44 |
if (@_) |
|
222
|
53 |
13 |
ref $_ ? : |
|
226
|
18 |
26 |
wantarray ? : |
|
232
|
2 |
86 |
if (@_) |
|
238
|
84 |
2 |
ref $_ ? : |
|
240
|
6 |
80 |
wantarray ? : |
|
246
|
66 |
34 |
if (@_ == 1) |
|
249
|
10 |
56 |
wantarray ? : |
|
254
|
2 |
34 |
ref $value eq 'CODE' ? : |
|
257
|
4 |
38 |
if ($code) |
|
261
|
2 |
2 |
if $orig eq $_ |
|
274
|
8 |
12 |
if (@_) { } |
|
277
|
0 |
8 |
if $self->size == 0 |
|
281
|
2 |
6 |
if ref $new_id eq 'CODE' |
|
283
|
2 |
4 |
if ($self->size == 1) { } |
|
295
|
4 |
8 |
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
|
48 |
16 |
if (ref $_[0] eq 'CODE') { } |
|
363
|
0 |
16 |
ref $_[0] ? : |
|
400
|
8 |
10 |
if (ref $rep eq 'CODE') |
|
405
|
14 |
4 |
unless ref $rep |
|
412
|
17 |
1 |
if ref $r |
|
414
|
17 |
1 |
if ref $r and $node->parent |
|
419
|
2 |
8 |
if ref $replacement eq (ref $self || $self) |
|
504
|
4 |
16 |
ref $class eq 'CODE' ? : |
|
508
|
28 |
4 |
unless $current_class =~ /(?:^|\s)$_(?:\s|$)/ |
|
527
|
0 |
20 |
unless defined $current_class |
|
529
|
4 |
16 |
ref $class eq 'CODE' ? : |
|
550
|
12 |
12 |
$_->has_class($class) ? : |
|
561
|
28 |
30 |
if $t->attr('class') =~ /(?:^|\s)$class(?:\s|$)/ |
|
578
|
2 |
75 |
if (@stuff == 2 and CORE::not ref $stuff[0] and $stuff[1]->isa('HTML::Element')) { } |
|
579
|
0 |
2 |
ref $stuff[0] ? : |
|
585
|
4 |
73 |
if $_->{'need_delete'} |
|
623
|
0 |
73 |
ref $selector ? : |
|
627
|
0 |
81 |
unless ref $e |
|
631
|
2 |
71 |
wantarray ? : |
|
639
|
0 |
38 |
ref $selector ? : |
|
676
|
18 |
51 |
if ($e->match($selector)) { } |
|
681
|
30 |
21 |
if ($current[1]) { } |
|
691
|
2 |
4 |
if ($args{'skip_leading'}) |
|
695
|
2 |
4 |
unless ($args{'pairs'}) |
|
707
|
1032 |
237 |
unless $_[0]{'need_delete'} |