| blib/lib/Algorithm/Dependency/Source/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 16 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 84 | 0 | 9 | unless my $filename = shift() |
| 85 | 0 | 9 | unless -r $filename |
| 88 | 0 | 9 | unless my $self = $class->SUPER::new |
| 108 | 0 | 9 | unless open FILE, $$self{'filename'} |
| 109 | 0 | 9 | unless defined(my $source = |
| 110 | 0 | 9 | unless close FILE |
| 121 | 0 | 94 | unless scalar @sections |
| 124 | 0 | 94 | unless my $Item = 'Algorithm::Dependency::Item'->new(@sections) |