line |
true |
false |
branch |
270
|
3 |
1 |
unless $caller eq 'main' |
398
|
14 |
71 |
if $self->options->{'f'} |
399
|
45 |
40 |
unless $bool and ++$self->{'nb_succ'} |
401
|
8 |
77 |
unless defined $exp_msg |
402
|
14 |
71 |
unless defined $got_msg |
403
|
43 |
42 |
if ($verbosity == 2 or $verbosity == 1 and not $bool) |
404
|
10 |
33 |
$bool ? : |
405
|
10 |
33 |
$bool ? : |
407
|
38 |
5 |
if ($exp_msg ne '') |
412
|
27 |
16 |
if (not $bool and $got_msg ne '') |
433
|
0 |
0 |
unless @msgs and $self->options->{'v'} > 0 |
437
|
0 |
0 |
unless defined $_ |
440
|
0 |
0 |
unless $msgs[-1] =~ /\n\Z/ |
540
|
0 |
0 |
unless $tee_hdl = 'IO::File'->new($file_name, 1025) |
555
|
7 |
8 |
defined $options{'a'} ? : |
561
|
2 |
13 |
defined $options{'e'} ? : |
562
|
0 |
15 |
if defined $options{'c'} |
563
|
10 |
5 |
if defined $options{'v'} |
564
|
2 |
13 |
if defined $options{'f'} |
571
|
51 |
56 |
unless $label =~ /$accept/ |
572
|
8 |
48 |
if $label =~ /$exclude/ |
585
|
1 |
47 |
if ($warnings) |
590
|
1 |
47 |
if ($@) |
604
|
1 |
14 |
$self->{'died'} ? : |
|
1 |
14 |
$self->{'warned'} ? : |
606
|
0 |
15 |
if ($tee_hdl) |
616
|
2 |
13 |
defined $options{'s'} ? : |
|
13 |
2 |
if (defined $options{'s'} ? $options{'s'} : $self->{'options'}{'s'}) |
702
|
1 |
0 |
defined $options{'c'} ? : |
704
|
0 |
1 |
unless grep((substr($_, 0, 1) eq 'd'), keys %options) |
731
|
2 |
9 |
if -d $spec |
732
|
5 |
4 |
unless matches_glob($spec, $options{'g'}) |
734
|
0 |
4 |
unless defined $module |
799
|
10 |
0 |
$val =~ /^(0|1|2)$/ ? : |
823
|
283 |
0 |
unless $gColor->{'id'} and $self->{'options'}{'c'} |
827
|
0 |
0 |
if ($gColor->{'id'} eq 'Win32Console') { } |
|
0 |
0 |
elsif ($gColor->{'id'} eq 'ANSI') { } |
841
|
0 |
0 |
if $chomped |