| lib/MKDoc/Control_List.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 6 | 11 | 54.5 | 
| line | l | !l | condition | 
|---|---|---|---|
| 42 | 1 | 0 | $file || die("Cannot read-open $file. Reason: $@") | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 34 | 1 | 1 | 0 | $$self{'data'} || $self->_read_file | 
| 52 | 2 | 2 | 0 | $$self{'_code'} ||= do { my $code = $self->_build_code; my $VAR1 = undef; eval $code; die $@ if $@; $VAR1 } | 
| 83 | 13 | 0 | 0 | $self->_build_code_condition($line) || $self->_build_code_ret_value($line) || $self->_build_code_rule($line) || do { warn "Cannot parse line $count.\n$line"; next } |