| File: | blib/lib/App/Project/Doctor/Context.pm |
| Coverage: | 96.7% |
| line | % | coverage | branch | |
|---|---|---|---|---|
| 57 | 100 | T | F | unless -d $args->{'root'} |
| 87 | 100 | T | F | unless defined $rel_path |
| 101 | 100 | T | F | unless defined $rel_path |
| 105 | 100 | T | F | if grep {$_ eq "..";} "File::Spec"->splitdir($rel_path) |
| 120 | 100 | T | F | unless defined $rel_path |
| 123 | 100 | T | F | unless -f $abs |
| 143 | 100 | T | F | unless @dirs |
| 190 | 50 | T | F | length $out ? : |
| 203 | 100 | T | F | if $self->has_file($f) |
| 218 | 100 | T | F | unless defined $dir |
| 222 | 100 | T | F | unless defined $pattern |
| 224 | 100 | T | F | ref $pattern eq 'Regexp' ? : |
| 243 | 100 | T | F | unless -d $abs_dir |
| 247 | 100 | T | F | unless -f $_ |
| 251 | 100 | T | F | if &$accept($rel) |