line |
true |
false |
branch |
112
|
0 |
5 |
ref $_[0] ? : |
124
|
0 |
5 |
if $args{'colours'} |
125
|
1 |
4 |
if _HASH($args{'colors'}) |
126
|
1 |
4 |
if _INSTANCE $args{'css'}, 'CSS::Tiny' |
164
|
0 |
4 |
unless my $Document = $self->_Document(shift()) |
167
|
0 |
4 |
unless $self->_build_fragments($Document) |
170
|
0 |
4 |
unless $self->_build_line_numbers |
173
|
0 |
4 |
unless $self->_optimize_fragments |
176
|
0 |
4 |
unless $self->_build_html |
192
|
0 |
35 |
if (_INSTANCE $Token, 'PPI::Token::HereDoc') { } |
193
|
0 |
0 |
unless @fragments = $self->_heredoc_fragments($Token) |
195
|
0 |
35 |
unless @fragments = $self->_simple_fragments($Token) |
200
|
0 |
35 |
unless $self->_add_fragment($Fragment) |
205
|
0 |
4 |
if ($$self{'heredoc_buffer'}) |
207
|
0 |
0 |
unless ($$self{'fragments'}[-1]->ends_line) |
208
|
0 |
0 |
unless my $Fragment = 'PPI::HTML::Fragment'->new("\n") |
226
|
35 |
0 |
if defined $_ |
232
|
0 |
35 |
unless my $Fragment = 'PPI::HTML::Fragment'->new($string, $css_class) |
245
|
0 |
0 |
unless $self->_add_heredoc($line, 'heredoc_content') |
250
|
0 |
0 |
unless $self->_add_heredoc($Token->terminator . "\n", 'heredoc_terminator') |
254
|
0 |
0 |
unless my $Fragment = 'PPI::HTML::Fragment'->new($Token->content, $self->_css_class($Token)) |
262
|
2 |
2 |
unless $$self{'line_numbers'} |
273
|
3 |
16 |
$_->ends_line ? : |
297
|
1 |
3 |
if ($$self{'page'}) |
328
|
4 |
32 |
if ($Fragment->css and $fragments[-1]->css and $Fragment->css eq $fragments[-1]->css) { } |
337
|
0 |
36 |
unless my $css = $Fragment->css |
338
|
12 |
24 |
if $css eq 'whitespace' |
343
|
1 |
3 |
if ($$self{'colors'}) |
346
|
4 |
7 |
unless my $css = $Fragment->css |
347
|
3 |
4 |
if $$colors{$css} |
363
|
0 |
1 |
$$self{'css'} ? : |
370
|
1 |
0 |
keys %$css ? : |
383
|
1 |
3 |
_INSTANCE($_[0], 'PPI::Document') ? : |
391
|
35 |
0 |
_INSTANCE($_[0], 'PPI::HTML::Fragment') ? : |
398
|
0 |
35 |
unless my $Fragment = $self->_Fragment(@_) |
405
|
0 |
35 |
if ($$self{'heredoc_buffer'} and $Fragment->ends_line) |
415
|
0 |
0 |
unless my $Fragment = $self->_Fragment(@_) |
428
|
5 |
30 |
if ($Token->isa('PPI::Token::Word')) |
433
|
5 |
0 |
unless ($Token->snext_sibling and $Token->snext_sibling->content eq '=>') |
434
|
0 |
5 |
if ($content eq 'sub') { } |
|
0 |
5 |
elsif ($content eq 'return') { } |
|
0 |
5 |
elsif ($content eq 'undef') { } |
|
0 |
5 |
elsif ($content eq 'shift') { } |
|
0 |
5 |
elsif ($content eq 'defined') { } |
448
|
0 |
5 |
if ($parent->isa('PPI::Statement::Include')) { } |
|
3 |
2 |
elsif ($parent->isa('PPI::Statement::Variable')) { } |
|
0 |
2 |
elsif ($parent->isa('PPI::Statement::Compound')) { } |
|
0 |
2 |
elsif ($parent->isa('PPI::Statement::Given')) { } |
|
0 |
2 |
elsif ($parent->isa('PPI::Statement::When')) { } |
|
0 |
2 |
elsif ($parent->isa('PPI::Statement::Package')) { } |
|
0 |
2 |
elsif ($parent->isa('PPI::Statement::Scheduled')) { } |
449
|
0 |
0 |
if ($content =~ /^(?:use|no)$/) |
452
|
0 |
0 |
if ($content eq $parent->pragma) |
456
|
3 |
0 |
if ($content =~ /^(?:my|local|our)$/) |
460
|
0 |
0 |
if ($content =~ /^(?:if|else|elsif|unless|for|foreach|while|my)$/) |
464
|
0 |
0 |
if ($content eq 'given') |
468
|
0 |
0 |
if ($content =~ /^(?:when|default)$/) |
472
|
0 |
0 |
if ($content eq 'package') |