Condition Coverage

blib/lib/Data/Rlist.pm
Criterion Covered Total %
condition 109 206 52.9


and 3 conditions

line !l l&&!r l&&r condition
673 1 0 0 defined $Readstruct && exists $$Readstruct{'filename'}
1334 0 0 0 $fcmd and $fcmdargs
1335 0 0 0 $fcmd and not $fcmdargs
1390 0 335 2 defined $r and not defined reftype($r)
1550 0 0 108 open $fh, ">$output" and flock $fh, 2
1559 21 38 49 ref $options and defined $$options{'precision'}
1560 21 2 85 ref $options and defined $$options{'eol_space'}
1623 0 0 12 ref $options and defined $$options{'eol_space'}
1645 0 0 6 open $fh, ">$output" and flock $fh, 2
1658 0 1 1 ref $options && defined $$options{'separator'}
1685 22 211 0 defined $options and $options eq 'perl'
1756 138 379 0 defined $rtp and $rtp ne 'SCALAR'
1766 1 0 137 open $$Readstruct{'fh'}, "<$input" and flock $$Readstruct{'fh'}, 1
1948 0 0 17 $C1 == 45 || $C1 == 46 and $Ln =~ s/$RELexSymbol//o
2060 0 0 0 defined $LnArray and $#$LnArray != -1
2072 8989 137 6603 $ReadFh and not eof $ReadFh
137 379 8610 defined $LnArray and $#$LnArray != -1
2152 4 0 0 $Data::Rlist::DEBUG and $q
2344 2003 4 0 $Data::Rlist::MaxDepth >= 1 and $Data::Rlist::MaxDepth < $Data::Rlist::Depth
2349 637 249 376 $Outline_data > 0 and $Outline_data <= $cnt
2387 256 0 240 $Outline_data && @keys
2392 376 0 120 $Outline_hashes and $manykeys
2439 649 2 0 $Data::Rlist::MaxDepth >= 1 and $Data::Rlist::MaxDepth < $Data::Rlist::Depth
2444 202 81 121 $Outline_data > 0 and $Outline_data <= $cnt
2472 82 0 85 $Outline_data && @keys
2477 126 0 41 $Outline_hashes and $manykeys
3166 3889 10011 0 $anm and defined $prec
3183 3889 10011 0 $bnm and defined $prec

or 2 conditions

line l !l condition
565 0 0 shift() || '??'
570 0 0 shift() || ''
1483 1250 0 shift() || 'default'
1491 923 1 shift() || 'default'
38 886 shift() || 'default'
1534 346 12 $$options{'_base'} || 'default'
1556 108 0 eval { do { hostname() } } || 'some unknown machine'
1623 12 0 $eol ||= "\n"
1665 336 0 shift() || 'string'
1678 3 0 shift() || 'default'
2898 0 0 shift() || ''
0 0 shift() || ''
3026 48 4 $_[1] || '[\\s]+'
3031 0 2 $_[1] || '[\\s]+'
3136 0 0 shift() || 0
3150 15447 276 $ind ||= 0
3592 0 0 $options ||= 'default'
3598 0 0 $options ||= 'default'
3604 5 1 $options ||= 'default'

or 3 conditions

line l !l&&r !l&&!r condition
834 0 139 0 ref $prototype || $prototype
1354 4 20 0 $options ||= $input->get('options')
1355 0 0 24 $fcmd ||= $input->get('filter')
1356 0 0 24 $fcmdargs ||= $input->get('filter_args')
1368 4 0 20 &complete_options($options)->{'delimiter'} || $Data::Rlist::DefaultCsvDelimiter
1381 0 4 0 $options ||= $input->get('options')
1383 3 1 0 $$options{'delimiter'} ||= $Data::Rlist::DefaultConfDelimiter
1517 0 102 105 $output ||= $data->get('-output')
1518 105 102 0 $options ||= $data->get('-options')
1519 0 0 207 $header ||= $data->get('-header')
1525 0 336 108 ref $output || !defined($output)
1527 444 0 0 $options ||= $to_string ? 'string' : 'fast'
1532 81 0 5 $fast or $perl
1536 81 0 363 $fast or $perl
1545 0 0 108 not defined $output or ref $output
1557 0 108 0 getlogin || getpwuid $<
1574 21 0 87 $fast || $perl
1585 336 0 0 not defined $output or ref $output eq 'SCALAR'
1586 60 0 276 $fast || $perl
1607 0 12 0 $output ||= $data->get('-output')
1608 2 10 0 $options ||= $data->get('-options')
1609 0 0 12 $columns ||= $data->get('-columns')
1610 0 0 12 $header ||= $data->get('-header')
1621 6 0 6 ref $output || !defined($output)
1657 0 2 0 $options ||= $data->get('options')
1686 211 22 0 $options ||= complete_options({'precision', undef}, 'squeezed')
1948 17 0 0 $C1 == 45 || $C1 == 46
3225 0 0 597 @a_keys_missing or @b_keys_missing