line |
true |
false |
branch |
49
|
0 |
66 |
unless my $method = $self->can("_op_" . $op)
|
67
|
0 |
307 |
if exists $retval{$nkey}
|
69
|
177 |
130 |
$auto_expand{$nkey} ? :
|
74
|
48 |
16 |
$input eq 'last' ? :
|
78
|
0 |
0 |
unless open my $fh, "-|", @command
|
81
|
0 |
0 |
unless my($filename, $style) = /\A (.*?): \s* :style=(.*)/msux
|
86
|
0 |
0 |
unless @candidates
|
87
|
0 |
0 |
if @candidates == 1
|
92
|
0 |
0 |
if $candidate->{'style'}{'Regular'} or $candidate->{'style'}{'Normal'}
|
100
|
16 |
0 |
unless (defined $s->_fonts->{$key})
|
101
|
0 |
16 |
$key =~ /\A file: (.*) \z/msux ? :
|
|
0 |
16 |
$key =~ /\A fc: (.*) \z/msux ? :
|
122
|
0 |
16 |
unless defined(my $source_path = $opts->{'from'} // $opts->{'from_path'})
|
141
|
0 |
16 |
if ($align ne "start")
|
143
|
0 |
0 |
$align eq 'end' ? :
|
156
|
0 |
16 |
if defined $plain
|
157
|
16 |
0 |
if defined $template
|
158
|
0 |
0 |
if defined $crumbs
|
166
|
17 |
34 |
if $key eq "op"
|
167
|
34 |
0 |
if (defined $value) { }
|
179
|
0 |
0 |
unless my $logger = $self->logger
|
180
|
0 |
0 |
unless my $method = $logger->can(lc $command->{'level'} // "info")
|