Branch Coverage

lib/File/Information/Link.pm
Criterion Covered Total %
branch 5 60 8.3


line true false branch
68 0 2 unless defined $self->{'path'}
78 2 6 unless (exists $self->{'inode'})
82 2 0 if ($self->{'symlinks'} eq 'nofollow') { }
0 0 elsif ($self->{'symlinks'} eq 'opportunistic-nofollow') { }
90 0 2 unless sysopen $fh, $self->{'path'}, 0 | $mode or opendir $fh, $self->{'path'}
104 0 0 if defined $self->{'deep'}
105 0 0 if exists $opts{'no_defaults'}
124 0 0 unless ($self->{'_loaded_dotcomments'})
133 0 0 unless -f $comments_file
135 0 0 unless $HAVE_XML_SIMPLE
141 0 0 unless open $fh, "<", $comments_file
147 0 0 if ($magic eq "\37\213")
154 0 0 unless defined $xml
159 0 0 if (defined $value and not ref $value and length $value)
166 0 0 if (defined $value)
167 0 0 if ($xml->{'version'} eq '2.0') { }
0 0 elsif ($xml->{'version'} eq '3.0') { }
168 0 0 if (not ref $value and $value =~ /^[0-9][1-9]+$/u and int $value)
172 0 0 if (ref $value and defined $value->{'value'} and not ref $value->{'value'} and $value->{'value'} =~ /^[0-9]{4}:[0-9]{2}:[0-9]{2} [0-9]{2}:[0-9]{2}:[0-9]{2}$/u)
181 0 0 if (defined $value and ref $value and defined $value->{'value'} and not ref $value->{'value'} and $value->{'value'} =~ /^[1-5]$/u)
184 0 0 if defined $_dot_comments_rating{$value->{'value'}}
191 0 0 if (defined $value and ref $value and defined $value->{'category'} and ref $value->{'category'})
193 0 0 if (ref $value)
195 0 0 if (ref $entry and defined $entry->{'value'} and length $entry->{'value'})
202 0 0 if (defined $pv->{'dotcomments_keywords'} and defined $pv->{'dotcomments_keywords'}{'raw'})
233 0 0 if ($basename =~ /\.([^\.]+)$/u)
247 0 0 unless ($self->{'_loaded_thumbnail'})
257 0 0 unless defined $mtime
262 0 0 if (scalar @stat)
263 0 0 if ($mtime < $stat[9])