| 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 |
60 |
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
|
17 |
21 |
if (exists $Data{$type}{'alias2id'}{lc $name}) { }
|
|
609
|
19 |
2 |
if $self->{'err'}
|
|
613
|
4 |
13 |
if (exists $Data{$type}{'alias2id'}{lc $new_name})
|
|
614
|
4 |
0 |
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
|
27777 |
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'}
|