line |
true |
false |
branch |
18
|
2 |
1 |
unless @_ |
19
|
6 |
0 |
defined &{"${me}::$_";} ? : |
23
|
2 |
4 |
unless $_[1] |
|
0 |
6 |
ref $_[0] ? : |
24
|
3 |
3 |
if $trace or $$args{'trace'} or @_ > 2 |
30
|
0 |
0 |
unless $_[1] |
|
0 |
0 |
ref $_[0] ? : |
31
|
0 |
0 |
if $trace or $$args{'trace'} or @_ > 2 |
35
|
1 |
0 |
unless $_[1] |
36
|
0 |
0 |
unless $_[1] |
37
|
1 |
0 |
unless $_[1] |
38
|
0 |
0 |
unless $_[1] |
43
|
0 |
4 |
defined $pretty ? : |
45
|
2 |
2 |
unless scalar keys %$self |
47
|
0 |
2 |
$p ? : |
49
|
0 |
2 |
$p ? : |
53
|
0 |
5 |
!($_[0] && $_[0] =~ /^[123]$/) ? : |
|
0 |
5 |
ref $_[0] ? : |
55
|
2 |
3 |
if $$args{'verbose'} and $$args{'verbose'} eq '1' |
56
|
3 |
0 |
eval {
do {
require 5.014
}
} ? : |
59
|
1 |
2 |
($DB::args[0] || '') ne \$nv ? : |
|
6 |
3 |
$nv ? : |
60
|
3 |
6 |
unless $sargs |
62
|
0 |
6 |
if $file eq '/.cpan/build/Throw-0.12-gDZkS7/blib/lib/Throw.pm' or $$args{'skip'}{$file} or $$args{'skip'}{$pkg} or $$args{'skip'}{$sub} |
63
|
0 |
6 |
if @$sargs > ($$args{'max_args'} ||= 5) |
66
|
0 |
0 |
ref $_ || !/\D/ ? : |
|
0 |
0 |
!defined($_) ? : |
|
6 |
0 |
!@$sargs || $i == 2 && $sub eq 'throw' ? : |
69
|
5 |
1 |
if length $sub > $m1 |
70
|
3 |
3 |
if length $file > $m2 |
71
|
3 |
3 |
if length $line > $m3 |
81
|
0 |
0 |
unless ref $ref |
82
|
0 |
0 |
defined $$err{'type'} ? : |
|
0 |
0 |
!ref($err) ? : |
84
|
0 |
0 |
unless length $b <=> length $a |
|
0 |
0 |
if @keys > 1 |
86
|
0 |
0 |
unless $type =~ /^\Q$key\E\b(?:$|\.)/ |
88
|
0 |
0 |
ref $val ? : |
90
|
0 |
0 |
unless exists $$ref{'default'} |
92
|
0 |
0 |
ref $val ? : |