| line |
true |
false |
branch |
|
38
|
0 |
1 |
$minor < 10 ? : |
|
108
|
4 |
0 |
if ($class eq 'PBib::Document') |
|
125
|
4 |
0 |
unless (defined $class) |
|
126
|
4 |
0 |
if (defined $filename) |
|
127
|
4 |
0 |
unless $args{'file-types'} |
|
129
|
0 |
0 |
if ($filename =~ /$pattern/i) |
|
133
|
0 |
4 |
if ($filename =~ /\.doc$/i) |
|
134
|
0 |
4 |
if ($filename =~ /\.rtf$/i) |
|
135
|
0 |
4 |
if ($filename =~ /\.s[tx]w$/i) |
|
136
|
0 |
4 |
if ($filename =~ /\.xml$/i) |
|
137
|
0 |
4 |
if ($filename =~ /\.xhtml$/i) |
|
142
|
0 |
4 |
if (defined $class) { } |
|
143
|
0 |
0 |
unless ($class =~ /::/) |
|
150
|
4 |
0 |
if (defined $class) |
|
153
|
0 |
4 |
unless (defined $version) |
|
156
|
0 |
4 |
if $args{'verbose'} |
|
207
|
4 |
0 |
unless (defined $fh) |
|
210
|
4 |
0 |
if (defined $filename) { } |
|
211
|
0 |
4 |
unless $$self{'quiet'} |
|
213
|
0 |
4 |
unless (defined $fh) |
|
217
|
0 |
0 |
if ($mode eq '>') { } |
|
218
|
0 |
0 |
unless $$self{'quiet'} |
|
221
|
0 |
0 |
unless $$self{'quiet'} |
|
225
|
0 |
0 |
unless (defined $fh) |
|
231
|
0 |
4 |
if (defined $enc) |
|
232
|
0 |
0 |
if (Encode::perlio_ok($enc)) { } |
|
233
|
0 |
0 |
if $$self{'verbose'} |
|
264
|
4 |
4 |
if (defined $fh) |
|
279
|
0 |
2 |
unless my $fh = $self->handle |
|
295
|
0 |
2 |
unless my $fh = $self->handle |
|
297
|
0 |
2 |
unless @lines |
|
327
|
0 |
0 |
$$self{'mode'} eq 'w' ? : |
|
366
|
1087 |
1087 |
if $outDoc |
|
381
|
0 |
6 |
unless defined $pars |
|
406
|
2180 |
2 |
if defined $$self{'paragraphs'} |
|
504
|
84 |
0 |
if defined $text |
|
510
|
2 |
0 |
unless $text |
|
515
|
0 |
0 |
unless $text |
|
572
|
66 |
0 |
unless $url |
|
573
|
66 |
0 |
$text eq $url ? : |
|
613
|
0 |
0 |
unless defined $a or defined $b |
|
614
|
0 |
108 |
unless defined $b |
|
615
|
0 |
108 |
unless defined $a |
|
616
|
108 |
0 |
length $a < 5 || length $b < 3 ? : |
|
637
|
0 |
0 |
unless (defined $filename) |
|
680
|
0 |
0 |
unless (defined $pid) |
|
684
|
0 |
0 |
if ($pid == 0) |
|
685
|
0 |
0 |
unless exec $filename |