| line |
true |
false |
branch |
|
325
|
159 |
122 |
unless $ok |
|
344
|
317 |
230 |
unless $ok |
|
360
|
0 |
0 |
if (_cmp_got_to_exp_warning_like($wrn_rec, $wrn)) |
|
370
|
0 |
0 |
unless $ok |
|
377
|
521 |
307 |
ref $_[0] eq 'ARRAY' ? : |
|
382
|
2080 |
716 |
$called_from eq 'Carp' ? : |
|
389
|
1088 |
698 |
if (ref $exp eq 'HASH') |
|
390
|
12 |
1076 |
unless my $to_carp = $exp->{'carped'} |
|
392
|
390 |
686 |
ref $to_carp eq 'ARRAY' ? : |
|
401
|
1 |
502 |
if $got_kind eq 'warn' and $exp_kind eq 'carped' |
|
403
|
6 |
496 |
if ($exp_msg =~ /\n$/s) { } |
|
414
|
1 |
984 |
if $got_kind eq 'warn' and $exp_kind eq 'carped' |
|
415
|
984 |
0 |
if (my $re = $Tester->maybe_regex($exp_msg)) { } |
|
427
|
98 |
183 |
unless scalar @got == scalar @exp |
|
436
|
196 |
351 |
unless scalar @got == scalar @exp |
|
444
|
1490 |
0 |
if (ref $_ eq 'HASH') { } |
|
445
|
1108 |
382 |
do {
$_
}->{'carped'} ? : |
|
451
|
66 |
410 |
unless @_ |
|
456
|
1424 |
0 |
if (ref $_ eq 'HASH') { } |
|
457
|
1064 |
360 |
do {
$_
}->{'carped'} ? : |
|
463
|
66 |
410 |
unless @_ |
|
485
|
0 |
0 |
unless my $category_bits = $bits->{$category} |
|
490
|
0 |
0 |
exists $warnings_in_category{$_} ? : |
|
498
|
0 |
0 |
unless my $re = _warning_category_regexp($category) |