Condition Coverage

lib/ClarID/Tools/Command/code.pm
Criterion Covered Total %
condition 73 157 46.5


and 3 conditions

line !l l&&!r l&&r condition
263 25 2 0 $self->with_condition_name and $self->action ne "decode"
299 144 10 2 $field eq "batch" and not defined $self->batch
300 142 10 2 $field eq "replicate" and not defined $self->replicate
330 20 12 4 $self->action eq "decode" and $self->with_condition_name
495 12 0 5 $self->with_condition_name and $code2name
513 0 0 120 defined $v and exists $fmap->{$v}
540 0 0 47 $pcfg and $pcfg->{'regex'}
556 13 0 0 $map and ref $map eq "HASH"
13 0 0 $map and ref $map eq "HASH" and exists $map->{$val}
565 0 0 13 $pcfg and $pcfg->{'regex'}
573 13 0 0 not @caps and $need == 1
13 0 0 not @caps and $need == 1 and $mode eq "stub"
611 0 0 9 $pad =~ /^\d+$/ and $pad > 0
613 0 0 9 $sid =~ /^\d+$/ and $sid >= 0
0 0 9 $sid =~ /^\d+$/ and $sid >= 0 and $sid <= $max
684 0 0 13 $pad =~ /^\d+$/ and $pad > 0
700 0 0 11 @rest and $rest[-1] =~ /^B(\d{2})$/
722 13 4 0 not $code =~ /\./ and length $code > 3
767 0 0 8 $w =~ /^\d+$/ and $w > 0
768 0 0 8 defined $sid and $sid =~ /^\d+$/
0 0 8 defined $sid and $sid =~ /^\d+$/ and $sid <= 62 ** $w - 1
826 0 0 3 defined $id and length $id
839 3 0 0 not defined $replicate and $id =~ s/(\d{2})$//
840 3 0 0 not defined $batch and $id =~ s/(\d{2})$//
845 1 1 1 $d_unit eq "N" and $d_num != 0
885 0 0 2 $w =~ /^\d+$/ and $w > 0
928 0 0 2 $ord >= 1 and $ord < @{$self->icd10_by_order;}
973 0 0 6 $pad =~ /^\d+$/ and $pad > 0
976 0 0 6 defined $sid and $sid =~ /^\d+$/
0 0 6 defined $sid and $sid =~ /^\d+$/ and $sid <= $max
1053 0 0 6 $w =~ /^\d+$/ and $w > 0
1084 0 0 6 defined $w and $w =~ /^\d+$/
0 0 6 defined $w and $w =~ /^\d+$/ and $w > 0
1174 0 0 7 $ord >= 1 and $ord < @{$self->icd10_by_order;}
1218 0 0 29 defined $id and $id =~ /^\d+$/
0 0 29 defined $id and $id =~ /^\d+$/ and $id >= 0
1239 0 0 17 defined $stub and $stub =~ /^[0-9A-Za-z]+$/

or 2 conditions

line l !l condition
271 16 0 $self->condition // ""
406 4 0 $code2name->{$clean} // ""
418 9 0 $sep ||= ","
451 13 0 $row->{'condition'} // ""
475 116 0 $row->{$_} // ""
494 147 0 $res->{$_} // ""
499 7 1 $code2name->{$c} // ""
504 45 0 $row->{$_} // ""
524 36 0 $pcfg->{'code_format'} // "%s"
24 0 $pcfg->{'stub_format'} // "%s"
829 3 0 $cb->{'replicate_pattern'}{'stub_format'} // "%02d"
830 3 0 $cb->{'batch_pattern'}{'stub_format'} // "%02d"
940 2 0 $batch // ""
2 0 $replicate // ""
1216 29 0 $width ||= 3
1260 36 0 delete $ents->{'_defaults'} || {}
1273 252 828 $map->{$k} //= {%{$defaults->{$k};}}

or 3 conditions

line l !l&&r !l&&!r condition
519 13 47 0 $pcfg->{'_re'} ||= qr/^(?:$pcfg->{'regex'})$/
527 13 47 0 $pcfg->{$need_key} //= do { (my $t = $fmt) =~ s/%%//g; scalar(() = $t =~ /%/g) }
1040 0 6 0 $cb->{'study'}{$study}{'stub_code'} // $study
1253 0 0 9 $code =~ /\./ or length $code <= 3