Branch Coverage

blib/lib/File/Descriptions.pm
Criterion Covered Total %
branch 50 64 78.1


line true false branch
62 4 0 if $_[0]
91 1 3 unless $current_dir =~ m[/$]
95 1 3 if (-f $current_file)
96 1 0 if (-r _)
97 1 0 if (open DESCRIPTOR, '<' . $current_file)
100 1 0 if ($line =~ /simtel/i)
107 2 176 if $_ eq ''
108 1 177 if $got_the_blank > 1
109 176 1 if ($got_the_blank)
126 1 3 if (-f $current_file)
127 1 0 if (-r _)
128 1 0 if (open DESCRIPTOR, '<' . $current_file)
131 1 0 if ($line =~ /^NOTE/i)
138 2 18 if $_ eq ''
139 0 20 if $got_the_blank > 2
140 16 4 if ($got_the_blank == 2)
164 1 3 unless $current_dir =~ m[/$]
168 1 3 if (-f $current_file)
169 1 0 if (-r _)
170 1 0 if (open DESCRIPTOR, '<' . $current_file)
180 2 31 if ($_ =~ /^Filename:/i)
182 2 0 if ($file ne '')
184 1 1 if (-e $current_test)
189 2 31 if ($_ =~ /Description:/i)
193 5 28 if ($got_the_file == 2)
196 1 32 if ($_ eq '')
211 1 3 unless $current_dir =~ m[/$]
215 1 3 if (-f $current_file)
216 1 0 if (-r _)
217 1 0 if (open DESCRIPTOR, '<' . $current_file)
227 2 0 if ($#desc = 6)
229 1 1 if (-e $current_test)