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
705 16 19 2 defined $defac and $text =~ /($_start_w $_Indicator $_sep* $_Klocal $_Adjacent? $_end_d)/gx
735 16 19 3 defined $defac and $text =~ /($_start_w $_Indicator $_sep* $_Local $_Adjacent? $_end_d)/gx
785 16 19 6 defined $defac and $text =~ /($_start_w $_Klocal $_Adjacent? $_end_d)/gx
815 0 16 19 $level >= 5 and defined $defac
839 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'}
876 36 0 3 defined $ext && length $ext

or 2 conditions

line l !l condition
533 17 18 $args{'level'} // 5
659 0 1 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+cc+karea+local+ext'}
671 0 2 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+cc+prefix+local'}
683 0 1 $nums{$num} //= {'_level', 1, '_order', ++$i, 'raw', $1, '_pat', 'ind+karea+local+ext'}
696 0 5 $nums{$num} //= {'_level', 1, '_order', ++$i, 'raw', $1, '_pat', 'ind+kprefix+local'}
712 0 2 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+klocal'}
727 0 1 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+prefix+local'}
742 0 3 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'ind+local'}
755 0 1 $nums{_normalize($2, $3, $4, $5)} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'cc+karea+local+ext'}
763 0 0 $nums{_normalize($2, $3, $4)} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'cc+prefix+local'}
776 0 11 $nums{$num} //= {'_level', 3, '_order', ++$i, 'raw', $1, '_pat', 'kprefix+local'}
791 0 6 $nums{$num} //= {'_level', 2, '_order', ++$i, 'raw', $1, '_pat', 'klocal'}
805 0 1 $nums{$num} //= {'_level', 5, '_order', ++$i, 'raw', $1, '_pat', 'prefix+local'}
821 0 5 $nums{$num} //= {'_level', 5, '_order', ++$i, 'raw', $1, '_pat', 'local (defac)'}
873 4 35 $cc //= '62'

or 3 conditions

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