| 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 |
5571 |
unless substr($phone, 0, 1) =~ /[1+]/ |
|
171
|
1485 |
4089 |
if ($phone =~ /^1(\d{3})\d{7}$/) { } |
|
174
|
772 |
27548 |
if ($area =~ /^($NANP_areas{$country})$/x) |
|
182
|
4080 |
30973 |
if (exists $Number::Phone::Country::idd_codes{$idd}) |
|
184
|
738 |
3342 |
if (ref $country eq "ARRAY") |
|
188
|
16 |
1003 |
if ($@) { } |
|
|
652 |
351 |
elsif ($class->new('+' . $phone)) { } |
|
192
|
3 |
649 |
$country_code eq 'GB' && $use_uk ? : |
|
209
|
4091 |
62 |
if $country =~ /^[a-z]{2}$/i |
|
211
|
1 |
4152 |
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} |