line |
true |
false |
branch |
19
|
2 |
29 |
if defined $msg
|
28
|
5 |
26 |
if (@_ - 1 == 0) { }
|
|
5 |
21 |
elsif ($pkg and ref $pkg eq 'Regexp') { }
|
|
6 |
15 |
elsif (ref $pkg) { }
|
44
|
11 |
20 |
if (defined $pkg and not defined $err_msg)
|
56
|
25 |
6 |
if (defined $err)
|
58
|
4 |
21 |
if ($desired_error)
|
72
|
13 |
8 |
if ($pkg)
|
81
|
0 |
13 |
unless ($err_msg)
|
88
|
1 |
20 |
!ref($err) ? :
|
90
|
7 |
14 |
if (defined $message and ref $err_msg eq 'Regexp') { }
|
|
11 |
3 |
elsif (defined $message and defined $err_msg and not ref $err_msg) { }
|
123
|
3 |
6 |
if $thrown
|
125
|
2 |
5 |
defined $desired_error ? :
|
|
2 |
7 |
defined $pkg ? :
|