Condition Coverage

blib/lib/File/Wildcard.pm
Criterion Covered Total %
condition 44 51 86.2


and 3 conditions

line !l l&&!r l&&r condition
387 0 19 9 exists $par{'path'} and not defined $par{'case_insensitive'}
625 404 4 70 -e $$self{'resulting_path'} and $$self{'resulting_path'} =~ /$re/
651 1012 163 10 exists $$self{'exclude'} and $rp =~ /$$self{'exclude'}/
684 270 270 631 $_ ne '.' and $_ ne '..'
723 204 0 0 exists $$self{'exclude'} and $$self{'resulting_path'} . $fil =~ /$$self{'exclude'}/

or 2 conditions

line l !l condition
383 2 26 $par{'ellipsis_order'} ||= 'normal'
394 12 0 $par{'debug_output'} ||= \*STDERR
402 62 14 $comp || '(.*?)'
430 70 34 $$self{'retval'} || 'undef'
573 1400 16 $$self{'wildcard'} || ''
587 1449 5 $$self{'state_stack'} ||= []
600 1437 17 $$self{'wildcard'} || ''
669 945 15 $$self{'resulting_path'} || '.'
708 512 270 shift @wcmatch || ''

or 3 conditions

line l !l&&r !l&&!r condition
389 9 0 0 eval { do { Filesys::Type::case($fspath) } } || Filesys::Type::Dummy::case()
508 1 3 1 not $$self{'state'} or $$self{'state'} eq 'finished'
538 2 4 29 not defined $path or ref $path
723 498 147 327 $fil eq '.' or $fil eq '..'
645 123 204 $fil eq '.' or $fil eq '..' or not $fil =~ /$re/
270 0 204 $fil eq '.' or $fil eq '..' or not $fil =~ /$re/ or exists $$self{'exclude'} and $$self{'resulting_path'} . $fil =~ /$$self{'exclude'}/