| line |
true |
false |
branch |
|
553
|
1 |
34 |
unless ($_Prefix_local)
|
|
616
|
17 |
18 |
if ($level >= 6)
|
|
624
|
2 |
15 |
if $oldtext ne $text
|
|
629
|
17 |
18 |
if ($level >= 6)
|
|
634
|
7 |
233 |
defined $$diglets{$1} ? :
|
|
640
|
2 |
15 |
if $oldtext ne $text
|
|
651
|
35 |
0 |
if ($level >= 1)
|
|
660
|
0 |
1 |
if $ind =~ /fax|faks|\bf\b/i
|
|
672
|
2 |
0 |
if $ind =~ /fax|faks|\bf\b/i
|
|
684
|
0 |
1 |
if $ind =~ /fax|faks|\bf\b/i
|
|
697
|
0 |
5 |
if $ind =~ /fax|faks|\bf\b/
|
|
702
|
35 |
0 |
if ($level >= 2)
|
|
713
|
0 |
2 |
if $ind =~ /fax|faks|\bf\b/i
|
|
718
|
35 |
0 |
if ($level >= 2)
|
|
728
|
0 |
1 |
if $ind =~ /fax|faks|\bf\b/i
|
|
743
|
0 |
3 |
if $ind =~ /fax|faks|\bf\b/i
|
|
750
|
35 |
0 |
if ($level >= 3)
|
|
769
|
35 |
0 |
if ($level >= 3)
|
|
782
|
35 |
0 |
if ($level >= 5)
|
|
798
|
35 |
0 |
if ($level >= 5)
|
|
814
|
19 |
16 |
if ($level >= 5 and defined $defac)
|
|
833
|
0 |
9 |
unless $nums{$a}{'_level'} <=> $nums{$b}{'_level'} or $nums{$b}{'_order'} <=> $nums{$a}{'_order'}
|
|
838
|
1 |
1 |
if (defined $args{'max_numbers'} and $args{'max_numbers'} > 0 and @nums > $args{'max_numbers'})
|
|
875
|
120 |
36 |
if defined $_
|
|
877
|
3 |
36 |
defined $ext && length $ext ? :
|
|
886
|
37 |
402 |
if $$textref ne $oldtext
|
|
892
|
32 |
2 |
unless $adj
|
|
895
|
0 |
2 |
unless abs $first - $adj == 1
|
|
904
|
0 |
40 |
unless my($cc, $prefix, $local, $ext) = $$num{'standard'} =~ /^\+(\d+)\.(\d+)\.(\d+)(?:\.ext*(\d+))?$/
|
|
911
|
3 |
37 |
if defined $ext
|
|
914
|
38 |
2 |
if $cc eq '62'
|
|
915
|
2 |
38 |
unless $cc eq '62'
|
|
917
|
21 |
17 |
if (length $local >= 8) { }
|
|
925
|
9 |
29 |
if (my $c = $cell_prefixes{$prefix}) { }
|
|
927
|
9 |
0 |
$$c{'is_gsm'} ? :
|
|
928
|
0 |
9 |
$$c{'is_cdma'} ? :
|
|
935
|
27 |
11 |
if (my $a = $area_codes{$prefix}) { }
|
|
940
|
1 |
26 |
unless ($_fwa_prefixes)
|
|
943
|
18 |
9 |
if ($local =~ /^($_fwa_prefixes)/)
|