| line |
true |
false |
branch |
|
25
|
0 |
68 |
unless $class->isa('Number::Phone::FR') |
|
26
|
68 |
0 |
if ($class eq 'Number::Phone::FR') { } |
|
27
|
8 |
60 |
if (@_) |
|
40
|
0 |
8 |
unless eval "require $class; 1" |
|
41
|
0 |
8 |
unless $class->isa('Number::Phone::FR') |
|
46
|
0 |
0 |
unless $pkg =~ /^Number::Phone(?:::|$)/ |
|
62
|
0 |
744 |
if defined $class and $class ne 'Number::Phone::FR' |
|
67
|
494 |
1658 |
if defined $impl |
|
131
|
0 |
231 |
if ref $class |
|
135
|
0 |
231 |
unless defined $number |
|
136
|
0 |
231 |
if ref $number |
|
140
|
0 |
231 |
if $num =~ /\A(?:\+|00)((?:[^3]|3[^3]).*)\z/ |
|
142
|
171 |
60 |
is_valid($number) ? : |
|
149
|
0 |
324 |
if &blessed($number) and $number->isa('Number::Phone::FR') |
|
171
|
203 |
189 |
if ($class) { } |
|
186
|
0 |
180 |
unless @matches |
|
188
|
90 |
90 |
if $line =~ (shift()) |
|
226
|
0 |
0 |
unless $_[1] =~ /\A08[0-9]{8}\z/ |
|
233
|
0 |
0 |
unless $_[1] =~ /\A08[0-9]{8}\z/ |
|
239
|
0 |
0 |
unless _check_line(@_, qr/\A8/) |
|
267
|
54 |
0 |
$num =~ /\A1(?:|[578]|0[0-9]{2}|1(?:[259]|6000|8[0-9]{3}))\z/ ? : |
|
289
|
54 |
98 |
unless @m |
|
314
|
6 |
0 |
defined $fmt ? : |