Condition Coverage

blib/lib/Parse/PhoneNumber/ID.pm
Criterion Covered Total %
condition 36 54 66.6


and 3 conditions

line !l l&&!r l&&r condition
704 16 19 2 defined $defac and $text =~ /($_start_w $_Indicator $_sep* $_Klocal $_Adjacent? $_end_d)/gx
734 16 19 3 defined $defac and $text =~ /($_start_w $_Indicator $_sep* $_Local $_Adjacent? $_end_d)/gx
784 16 19 6 defined $defac and $text =~ /($_start_w $_Klocal $_Adjacent? $_end_d)/gx
814 0 16 19 $level >= 5 and defined $defac
838 33 0 2 defined $args{'max_numbers'} and $args{'max_numbers'} > 0
33 1 1 defined $args{'max_numbers'} and $args{'max_numbers'} > 0 and @nums > $args{'max_numbers'}
877 36 0 3 defined $ext && length $ext

or 2 conditions

line l !l condition
532 17 18 $args{'level'} // 5
658 0 1 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+cc+karea+local+ext'}
670 0 2 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+cc+prefix+local'}
682 0 1 $nums{$num} //= {'_level', 1, '_order', ++$i, 'raw', $1, '_pat', 'ind+karea+local+ext'}
695 0 5 $nums{$num} //= {'_level', 1, '_order', ++$i, 'raw', $1, '_pat', 'ind+kprefix+local'}
711 0 2 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+klocal'}
726 0 1 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+prefix+local'}
741 0 3 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+local'}
754 0 1 $nums{_normalize($2, $3, $4, $5)} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'cc+karea+local+ext'}
762 0 0 $nums{_normalize($2, $3, $4)} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'cc+prefix+local'}
775 0 11 $nums{$num} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'kprefix+local'}
790 0 6 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'klocal'}
804 0 1 $nums{$num} //= {'_level', 5, '_order', ++$i, 'raw', $1, '_pat', 'prefix+local'}
820 0 5 $nums{$num} //= {'_level', 5, '_order', ++$i, 'raw', $1, '_pat', 'local (defac)'}
874 4 35 $cc //= '62'

or 3 conditions

line l !l&&r !l&&!r condition
833 5 4 0 $nums{$a}{'_level'} <=> $nums{$b}{'_level'} or $nums{$b}{'_order'} <=> $nums{$a}{'_order'}