line |
true |
false |
branch |
24
|
0 |
6 |
if ($^O eq 'MSWin32') |
25
|
0 |
0 |
unless ($ENCODING_LOCALE) |
28
|
0 |
0 |
unless (defined &GetACP) |
31
|
0 |
0 |
unless $@ |
33
|
0 |
0 |
unless (defined &GetACP) |
37
|
0 |
0 |
if (defined &GetACP) |
39
|
0 |
0 |
if $cp |
44
|
0 |
0 |
unless ($ENCODING_CONSOLE_IN) |
46
|
0 |
0 |
unless (defined &GetInputCP) |
51
|
0 |
0 |
unless $@ |
52
|
0 |
0 |
unless $@ |
54
|
0 |
0 |
unless (defined &GetInputCP) |
60
|
0 |
0 |
unless $@ |
62
|
0 |
0 |
unless $@ |
65
|
0 |
0 |
unless (defined &GetInputCP) |
70
|
0 |
0 |
(`chcp` || '') =~ /^Active code page: (\d+)/ ? : |
76
|
0 |
0 |
if $cp |
78
|
0 |
0 |
if $cp |
82
|
5 |
1 |
unless ($ENCODING_LOCALE) |
91
|
0 |
5 |
if $ENCODING_LOCALE eq '646' |
94
|
0 |
5 |
if $^O eq 'hpux' and $ENCODING_LOCALE eq 'roman8' |
99
|
0 |
6 |
if ($^O eq 'darwin') |
104
|
0 |
0 |
$^O eq 'MSWin32' ? : |
109
|
0 |
6 |
unless (&Encode::find_encoding($ENCODING_LOCALE)) |
111
|
0 |
0 |
if (lc $ENCODING_LOCALE eq 'gb18030') |
115
|
0 |
0 |
if ($@) |
118
|
0 |
0 |
if &Encode::find_encoding($ENCODING_LOCALE) |
120
|
0 |
0 |
unless $foundit |
138
|
1 |
3 |
if (defined ${'ENCODING_' . uc($a);}) |
155
|
0 |
1 |
if defined wantarray |
164
|
4 |
5 |
if (@_) |
166
|
3 |
1 |
if (defined $v) { } |
173
|
9 |
0 |
if defined wantarray |