line |
true |
false |
branch |
467
|
0 |
4 |
unless (defined $args{'country'} and $args{'country'} =~ /^(AU|Australia|GB|United Kingdom|US|United States|CA|Canada)$/) |
514
|
12 |
3 |
if ($address->{'auto_clean'}) |
531
|
2 |
13 |
if ($address->{'country_code'} ne 'US' and $address->{'input_string'} =~ m[^(\d{1,4}[A-Z]{0,2})[/| ](\d+[ \w-].*)$]) |
565
|
0 |
323 |
if ($uc_all) |
572
|
187 |
136 |
if ($curr_key =~ /^(base_street_name|street_name|street_type|suburb|property_name|sub_property|pre_cursor|po_box_type|level|building)/) { } |
|
34 |
102 |
elsif ($curr_key =~ /street_direction/) { } |
575
|
1 |
186 |
if ($curr_key eq 'street_name' and $curr_value =~ /^US HIGHWAY (.*)/) { } |
|
17 |
169 |
elsif ($curr_key eq 'sub_property_identifier') { } |
589
|
0 |
5 |
if ($word =~ /^\d{1,3}(ST|ND|RD|TH)$/) { } |
|
0 |
5 |
elsif (length $word > 1 and not $word =~ /\d/) { } |
610
|
71 |
98 |
if ($curr_value) { } |
625
|
1 |
33 |
if (length $curr_value == 1 or length $curr_value == 2) { } |
|
0 |
33 |
elsif (length $curr_value > 2) { } |
657
|
0 |
0 |
unless ($address->{'properties'}{'type'} eq 'unknown') |
670
|
0 |
0 |
if ($address->{'country'} eq 'US') { } |
687
|
0 |
0 |
if ($component_vals{$component}) |
694
|
0 |
0 |
if ($address->{'error'} and $address->{'force_case'}) |
728
|
0 |
0 |
if ($props{'type'}) |
746
|
0 |
0 |
if (defined $comps{$comp}) |
776
|
1 |
14 |
if ($pre_cursor) { } |
785
|
1 |
14 |
if ($level) { } |
794
|
1 |
14 |
if ($building) { } |
804
|
1 |
14 |
if ($po_box_type) { } |
815
|
1 |
14 |
if ($parsed_address->{'post_box'}) |
821
|
0 |
15 |
if ($parsed_address->{'road_box'}) |
827
|
1 |
14 |
if ($parsed_address->{'property_name'}) |
835
|
4 |
11 |
if ($parsed_address->{'sub_property'}) |
837
|
4 |
0 |
if ($parsed_address->{'sub_property'} =~ /^(#|[A-Z]{1,}) (.*)$/) { } |
|
0 |
0 |
elsif ($parsed_address->{'sub_property'} =~ /^(\d\w\w) (.*)$/) { } |
852
|
13 |
2 |
if ($parsed_address->{'property_identifier'}) |
860
|
0 |
15 |
if ($street_direction) { } |
872
|
13 |
2 |
if ($parsed_address->{'street_name'}) |
875
|
0 |
13 |
if ($parsed_address->{'street_name'} eq 'THE ') { } |
888
|
1 |
14 |
if ($parsed_address->{'street_direction_suffix'}) |
895
|
15 |
0 |
if ($parsed_address->{'suburb'}) |
901
|
15 |
0 |
if ($parsed_address->{'subcountry'}) |
906
|
7 |
8 |
if ($address->{'abbreviate_subcountry'}) { } |
910
|
1 |
6 |
if ($code ne 'unknown') { } |
927
|
15 |
0 |
if ($parsed_address->{'post_code'}) |
933
|
1 |
14 |
if ($parsed_address->{'country'}) |
941
|
1 |
14 |
if ($parsed_address->{'non_matching'}) |
961
|
2 |
13 |
unless ($street_name) |
967
|
4 |
9 |
if (@words > 1) |
969
|
0 |
4 |
if ($words[0] =~ /^(N|NE|NW|E|S|SE|SW|W|NORTH|EAST|SOUTH|WEST|NTH|STH)$/) |
991
|
1 |
14 |
if ($address->{'properties'}{'non_matching'}) { } |
998
|
0 |
14 |
if ($address->{'properties'}{'type'} eq 'unknown') { } |
1005
|
0 |
14 |
if ($address->{'force_post_code'} and not $address->{'components'}{'post_code'}) |
1012
|
0 |
14 |
if ($address->{'input_string'} =~ m[[^"A-Z0-9'\-\.,/ ]]) |
1019
|
12 |
2 |
if ($address->{'properties'}{'type'} eq 'suburban') |
1022
|
11 |
1 |
unless ($street =~ /\d/) |
1025
|
1 |
10 |
if (_check_vowel($address->{'components'}{'base_street_name'})) |
1034
|
0 |
14 |
if (_check_vowel($address->{'components'}{'suburb'})) |
1096
|
12 |
0 |
unless ($input =~ /^\d+ [A-Z] (ST|AVE)/) |
1099
|
0 |
12 |
if ($address->{'country_code'} eq 'US') { } |
1112
|
0 |
12 |
if ($address->{'country_code'} eq 'US') { } |
1160
|
1 |
14 |
if ($input =~ m[^(C/O.*?|ATTN.*?) (\d+|PO BOX)( .*)]) { } |
1183
|
1 |
14 |
if ($input =~ / ?((FIRST|SECONND|THIRD|FOURTH|FIFTH|SIXTH) (FLOOR|FLR|FL) )/ or $input =~ / ?(\d{1,2}(ST|ND|RD|TH) (FLOOR|FLR|FL) )/ or $input =~ m[ ?(LEVEL (\d{1,2}|[GM])[/ -])] or $input =~ m[ ?((FLOOR|FLR|FL) \d{1,2}[/ -])]) |
1214
|
1 |
14 |
if ($input =~ / ($bld $id) / or $input =~ /^($bld $id) /) |
1239
|
1 |
14 |
if ($input =~ /^(.*?) (PRIVATE BOXES)( .*)$/) { } |
1262
|
110 |
175 |
if ($address->{'components'}{$key}) |
1286
|
1 |
33 |
if (length $word > 1 and not $word =~ /[AEIOUY]|ST|MT|DR|JN?R|SN?R/) |