| line |
true |
false |
branch |
|
61
|
4 |
28 |
if ($_errno_encoding eq 'MT_BINARY') { }
|
|
67
|
1 |
27 |
utf8::is_utf8($err) ? :
|
|
69
|
2 |
26 |
unless (eval {
do {
$res = utf8::is_utf8($err) ? $err : &decode($_errno_encoding, $err, &Encode::DIE_ON_ERR() | &Encode::LEAVE_SRC());
1
}
})
|
|
83
|
6 |
548 |
if ref $_[0] eq ref {}
|
|
84
|
4 |
550 |
if (scalar @_ == 1) { }
|
|
90
|
14 |
609 |
if ($key eq 'ERRNO') { }
|
|
91
|
2 |
12 |
if exists $data{'errno'}
|
|
95
|
305 |
304 |
unless $data{$key} = shift()
|
|
107
|
68 |
182 |
@_ ? :
|
|
108
|
235 |
3 |
if ref $e eq ref {} and $e->{'MTEXCEPTION'}
|
|
117
|
24 |
4 |
unless defined $e
|
|
119
|
22 |
6 |
if get_exception($e)
|
|
130
|
15 |
50 |
if (my($format, $name) = $match =~ /^([\w]+)\s+([\w]+)$/) { }
|
|
132
|
13 |
2 |
if (defined $value) { }
|
|
133
|
7 |
6 |
if (lc $format eq 'string') { }
|
|
142
|
49 |
1 |
defined $data{$match} ? :
|
|
146
|
39 |
0 |
if %data
|
|
155
|
3 |
4 |
defined $where && length $where ? :
|
|
156
|
2 |
5 |
if (is_exception('cmd_error')) { }
|
|
|
3 |
2 |
elsif (is_exception()) { }
|