| line |
true |
false |
branch |
|
50
|
1 |
31 |
defined $show_errors ? : |
|
57
|
19 |
13 |
if $type |
|
58
|
1 |
31 |
if $codeset |
|
71
|
2 |
28 |
unless (exists $Locale::Codes::ALL_CODESETS{$type}) |
|
72
|
1 |
1 |
if $self->{'err'} |
|
79
|
0 |
28 |
if ($@) |
|
85
|
0 |
28 |
if ($@) |
|
100
|
2 |
2 |
unless (exists $Locale::Codes::ALL_CODESETS{$type}{'codesets'}{$codeset}) |
|
101
|
1 |
1 |
if $self->{'err'} |
|
138
|
11 |
1268 |
unless defined $code |
|
139
|
506 |
773 |
if defined $codeset |
|
141
|
2 |
1277 |
unless ($self->{'type'}) |
|
143
|
1 |
1 |
if $self->{'err'} |
|
147
|
39 |
1238 |
if ($codeset and not exists $Locale::Codes::ALL_CODESETS{$type}{'codesets'}{$codeset}) |
|
149
|
36 |
3 |
if $self->{'err'} |
|
155
|
776 |
462 |
if not defined $codeset or $codeset eq "" |
|
156
|
427 |
811 |
if $code eq "" |
|
162
|
671 |
140 |
if ($op eq "lc") |
|
166
|
72 |
739 |
if ($op eq "uc") |
|
170
|
30 |
781 |
if ($op eq "ucfirst") |
|
174
|
38 |
773 |
if ($op eq "numeric") |
|
175
|
30 |
8 |
if ($code =~ /^\d+$/) { } |
|
180
|
7 |
1 |
if $self->{'err'} |
|
187
|
152 |
24 |
unless ($no_check_code or exists $Data{$type}{'code2id'}{$codeset}{$code} or exists $Retired{$type}{$codeset}{'code'}{$code} or exists $Data{$type}{'codealias'}{$codeset}{$code}) |
|
192
|
145 |
7 |
if $self->{'err'} |
|
210
|
9 |
470 |
if (@args and defined $args[$#args] and lc $args[$#args] eq "retired") |
|
215
|
2 |
480 |
unless ($self->{'type'}) |
|
216
|
1 |
1 |
if $self->{'err'} |
|
222
|
66 |
414 |
if $err or not $code |
|
225
|
18 |
396 |
if exists $Data{$type}{'codealias'}{$codeset}{$code} |
|
227
|
393 |
21 |
if (exists $Data{$type}{'code2id'}{$codeset}{$code}) { } |
|
|
3 |
18 |
elsif ($retired and exists $Retired{$type}{$codeset}{'code'}{$code}) { } |
|
241
|
18 |
305 |
unless $name |
|
245
|
6 |
99 |
if (@args and defined $args[$#args] and lc $args[$#args] eq "retired") |
|
250
|
2 |
303 |
unless ($self->{'type'}) |
|
251
|
1 |
1 |
if $self->{'err'} |
|
257
|
3 |
300 |
if $err |
|
259
|
267 |
33 |
if (exists $Data{$type}{'alias2id'}{$name}) { } |
|
|
3 |
30 |
elsif ($retired and exists $Retired{$type}{$codeset}{'name'}{$name}) { } |
|
261
|
255 |
12 |
if (exists $Data{$type}{'id2code'}{$codeset}{$id}) |
|
281
|
2 |
66 |
unless ($self->{'type'}) |
|
283
|
1 |
1 |
if $self->{'err'} |
|
290
|
3 |
63 |
if (@args == 2) { } |
|
|
60 |
3 |
elsif (@args == 3) { } |
|
293
|
0 |
3 |
if $err |
|
298
|
12 |
48 |
if $err |
|
300
|
0 |
48 |
if $err |
|
311
|
0 |
3 |
unless ($self->{'type'}) |
|
313
|
0 |
0 |
if $self->{'err'} |
|
319
|
0 |
3 |
if $err or not $code |
|
336
|
3 |
44 |
if (@args and lc $args[$#args] eq "retired") |
|
341
|
2 |
45 |
unless ($self->{'type'}) |
|
342
|
1 |
1 |
if $self->{'err'} |
|
348
|
3 |
42 |
if $err |
|
351
|
3 |
39 |
if $retired |
|
358
|
3 |
23 |
if (@args and lc $args[$#args] eq "retired") |
|
363
|
2 |
24 |
unless ($self->{'type'}) |
|
364
|
1 |
1 |
if $self->{'err'} |
|
370
|
3 |
21 |
if $err |
|
380
|
3 |
18 |
if ($retired) |
|
402
|
2 |
52 |
unless ($self->{'type'}) |
|
403
|
1 |
1 |
if $self->{'err'} |
|
411
|
32 |
20 |
if ($err) |
|
413
|
31 |
1 |
if $self->{'err'} |
|
431
|
11 |
9 |
if (exists $Data{$type}{'alias2id'}{lc $new_name}) { } |
|
435
|
8 |
3 |
if ($new_id != $id) |
|
438
|
7 |
1 |
if $self->{'err'} |
|
469
|
2 |
60 |
unless ($self->{'type'}) |
|
470
|
1 |
1 |
if $self->{'err'} |
|
478
|
5 |
55 |
if ($err) |
|
479
|
4 |
1 |
if $self->{'err'} |
|
486
|
8 |
47 |
if (exists $Data{$type}{'code2id'}{$codeset}{$code} or exists $Data{$type}{'codealias'}{$codeset}{$code}) |
|
488
|
7 |
1 |
if $self->{'err'} |
|
497
|
14 |
33 |
if (exists $Data{$type}{'alias2id'}{lc $name}) { } |
|
499
|
5 |
9 |
if (exists $Data{$type}{'id2code'}{$codeset}{$id}) |
|
500
|
4 |
1 |
if $self->{'err'} |
|
528
|
2 |
32 |
unless ($self->{'type'}) |
|
529
|
1 |
1 |
if $self->{'err'} |
|
537
|
8 |
24 |
if ($err) |
|
539
|
7 |
1 |
if $self->{'err'} |
|
546
|
24 |
0 |
if (exists $Data{$type}{'code2id'}{$codeset}{$code}) |
|
555
|
9 |
3 |
if $Data{$type}{'codealias'}{$codeset}{$alias} ne $code |
|
564
|
6 |
54 |
if exists $Data{$type}{'id2code'}{$cs}{$id} |
|
567
|
18 |
6 |
unless ($inuse) |
|
579
|
0 |
24 |
if (exists $Retired{$type}{$codeset}{'code'}{$code}) |
|
597
|
2 |
38 |
unless ($self->{'type'}) |
|
598
|
1 |
1 |
if $self->{'err'} |
|
606
|
18 |
20 |
if (exists $Data{$type}{'alias2id'}{lc $name}) { } |
|
609
|
19 |
1 |
if $self->{'err'} |
|
613
|
5 |
13 |
if (exists $Data{$type}{'alias2id'}{lc $new_name}) |
|
614
|
4 |
1 |
if $self->{'err'} |
|
640
|
2 |
37 |
unless ($self->{'type'}) |
|
641
|
1 |
1 |
if $self->{'err'} |
|
649
|
17 |
20 |
if (exists $Data{$type}{'alias2id'}{lc $name}) { } |
|
652
|
19 |
1 |
if $self->{'err'} |
|
657
|
5 |
12 |
if ($n == 1) |
|
659
|
4 |
1 |
if $self->{'err'} |
|
676
|
27825 |
12 |
if $jd ne $id or $j < $i |
|
678
|
6 |
6 |
if ($i == $j) { } |
|
699
|
2 |
42 |
unless ($self->{'type'}) |
|
700
|
1 |
1 |
if $self->{'err'} |
|
709
|
23 |
19 |
if ($err) |
|
711
|
22 |
1 |
if $self->{'err'} |
|
732
|
8 |
11 |
if (exists $Data{$type}{'codealias'}{$codeset}{$new_code}) { } |
|
|
5 |
6 |
elsif (exists $Data{$type}{'code2id'}{$codeset}{$new_code}) { } |
|
734
|
3 |
5 |
if ($Data{$type}{'codealias'}{$codeset}{$new_code} eq $code) { } |
|
742
|
4 |
1 |
if $self->{'err'} |
|
749
|
4 |
1 |
if $self->{'err'} |
|
776
|
2 |
42 |
unless ($self->{'type'}) |
|
777
|
1 |
1 |
if $self->{'err'} |
|
786
|
23 |
19 |
if ($err) |
|
788
|
22 |
1 |
if $self->{'err'} |
|
797
|
8 |
11 |
if (exists $Data{$type}{'code2id'}{$codeset}{$new_code} or exists $Data{$type}{'codealias'}{$codeset}{$new_code}) |
|
799
|
7 |
1 |
if $self->{'err'} |
|
819
|
2 |
34 |
unless ($self->{'type'}) |
|
820
|
1 |
1 |
if $self->{'err'} |
|
828
|
23 |
11 |
if ($err) |
|
830
|
22 |
1 |
if $self->{'err'} |
|
837
|
5 |
6 |
unless (exists $Data{$type}{'codealias'}{$codeset}{$code}) |
|
838
|
4 |
1 |
if $self->{'err'} |