blib/lib/File/Wildcard.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 44 | 51 | 86.2 |
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'}/ |
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 || '' |
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'}/ |