| line |
true |
false |
branch |
|
15
|
136 |
3 |
if (lc $param eq 'noexport') { } |
|
|
2 |
1 |
elsif (lc $param eq 'uk') { } |
|
19
|
1 |
136 |
if ($export) |
|
167
|
3 |
5568 |
unless substr($phone, 0, 1) =~ /[1+]/ |
|
171
|
1485 |
4086 |
if ($phone =~ /^1(\d{3})\d{7}$/) { } |
|
174
|
772 |
27163 |
if ($area =~ /^($NANP_areas{$country})$/x) |
|
182
|
4077 |
30943 |
if (exists $Number::Phone::Country::idd_codes{$idd}) |
|
184
|
732 |
3345 |
if (ref $country eq "ARRAY") |
|
188
|
16 |
994 |
if ($@) { } |
|
|
646 |
348 |
elsif ($class->new('+' . $phone)) { } |
|
192
|
3 |
643 |
$country_code eq 'GB' && $use_uk ? : |
|
209
|
4088 |
62 |
if $country =~ /^[a-z]{2}$/i |
|
211
|
1 |
4149 |
unless my $data = $Number::Phone::Country::prefix_codes{$country} |
|
219
|
1 |
244 |
unless my $data = $Number::Phone::Country::prefix_codes{$country} |
|
227
|
0 |
239 |
unless my $data = $Number::Phone::Country::prefix_codes{$country} |
|
235
|
1 |
239 |
unless my $data = $Number::Phone::Country::prefix_codes{$country} |