Branch Coverage

blib/lib/Algorithm/Dependency/Source/File.pm

Criterion	Covered	Total	%
branch	8	16	50.0

line	true	false	branch
77	0	9	unless my $filename = shift()
78	0	9	unless -r $filename
81	0	9	unless my $self = $class->SUPER::new
101	0	9	unless open FILE, $self->{'filename'}
102	0	9	unless defined(my $source = readline FILE)
103	0	9	unless close FILE
114	0	94	unless scalar @sections
117	0	94	unless my $Item = 'Algorithm::Dependency::Item'->new(@sections)