Condition Coverage

blib/lib/Data/Beacon.pm
Criterion Covered Total %
condition 5 65 7.6


and 3 conditions

line !l l&&!r l&&r condition
207 0 0 0 _is_uri($fields[0]) and _is_uri($fields[3])
316 0 0 0 ref $_[0] and UNIVERSAL::isa($_[0], 'Data::Beacon')
345 7 0 0 @_ % 2 and not blessed($_[0])
7 0 0 @_ % 2 and not blessed($_[0]) and ref $_[0]
0 0 0 @_ % 2 and not blessed($_[0]) and ref $_[0] and ref $_[0] eq 'HASH'
361 1 0 2 ref $handler and ref $handler eq 'CODE'
373 0 0 0 ref $handler and ref $handler eq 'CODE'
380 0 0 0 ref $param{'pre'} and ref $param{'pre'} eq 'HASH'
489 0 0 0 ref $$self{'from'} and ref $$self{'from'} eq 'CODE'
520 0 0 0 $n > 1 and _is_uri($parts[$n - 2])
572 0 0 0 defined $msg and $msg ne ''
626 0 0 0 defined $scheme and length $scheme
0 0 0 defined $scheme and length $scheme and defined $path
629 0 0 0 defined $authority and length $authority

or 2 conditions

line l !l condition
461 0 5 shift() || $$self{'currentline'} || ''

or 3 conditions

line l !l&&r !l&&!r condition
203 0 0 0 $fields[0] eq '' or grep {$_ =~ /\||\n|\r/;} @fields
235 0 0 0 @parts < 1 or $parts[0] =~ /^\s*$/
373 0 0 0 $handler =~ /^(print|expand)$/ or ref $handler and ref $handler eq 'CODE'
514 0 0 0 $target or $targetprefix
560 0 0 0 $$self{'meta'}{$label eq '1' ? 'ONEMESSAGE' : 'SOMEMESSAGE'} || $$self{'meta'}{'MESSAGE'}
570 0 0 0 $$self{'meta'}{'NAME'} || $$self{'meta'}{'INSTITUTION'}
630 0 0 0 length $path == 0 or $path =~ m[^/]