| line |
true |
false |
branch |
|
6
|
3 |
13 |
unless defined $_[0]
|
|
7
|
0 |
13 |
unless length $_[0]
|
|
8
|
0 |
13 |
unless $_[0] =~ /^\+\d/
|
|
10
|
0 |
13 |
unless $_[0] =~ /^\+\d{11}/
|
|
12
|
1 |
12 |
unless $_[0] =~ /^\+\d{11,16}(?:\D|$)/
|
|
14
|
0 |
12 |
unless $_[0] =~ /^\+\d{11,16}(?:[pw]\d+)?$/
|
|
22
|
3 |
10 |
if ($code eq 'ru')
|
|
23
|
1 |
2 |
unless ($sign)
|
|
33
|
1 |
15 |
unless $str
|
|
40
|
1 |
14 |
unless $phone
|
|
43
|
1 |
13 |
if $region and 11 > length $phone
|
|
44
|
1 |
13 |
if $country and 11 > length $phone
|
|
45
|
1 |
13 |
unless 10 <= length $phone
|
|
51
|
5 |
8 |
if defined $pause
|
|
52
|
5 |
8 |
if defined $add
|