Condition Coverage

lib/File/Information.pm
Criterion Covered Total %
condition 15 106 14.1


and 3 conditions

line !l l&&!r l&&r condition
142 0 0 0 not defined $opts{'type'} and ref $opts{'identifier'}
259 1 0 0 scalar @algos == 1 and $algos[0] =~ /^v0m /u
1 0 0 scalar @algos == 1 and $algos[0] =~ /^v0m /u and wantarray
283 1 0 0 not wantarray and scalar @algos != 1
307 0 0 0 defined($home = $ENV{'USERPROFILE'}) and length $home
308 0 0 0 defined $ENV{'HOMEDRIVE'} and defined $ENV{'HOMEPATH'}
314 0 0 2 defined($home = $ENV{'HOME'}) and length $home
315 0 0 0 defined($home = eval {
328 0 0 0 defined $base and length $base
476 0 0 0 $HAVE_UNIX_MKNOD and $^O eq "linux"
494 0 0 0 not defined $entry->{'stat'} and $source =~ m[^/]u
499 0 0 0 not defined $entry->{'dirstat'} and $mountpoint =~ m[^/]u

or 2 conditions

line l !l condition
49 0 2 $self->{'store'} //= []
62 0 2 $self->{'digest_sizelimit'} //= 536870912
71 0 2 $self->{'boring_sizelimit'} //= 128
74 0 2 $self->{'boring_extension'} //= ["o", "bakX", "old", "orig", "part", "rej", "swp", "tmp", "dpkg-dist", "dpkg-old", "ucf-dist", "ucf-new", "ucf-old", "rpmnew", "rpmorig", "rpmsave"]
107 0 2 $opts{'symlinks'} //= "nofollow"
181 0 0 $fs->get("uuid", "as", "uuid", "default", undef) // (next)
244 2 0 $as // ""
270 15 5 $File::Information::Base::_digest_info_extra{$_} // {}
287 0 0 $File::Information::Base::_digest_name_converter{fc $_} // ""
418 7 1 $self->{'_tagpool_sysfile_cache'} //= {}
424 0 0 $self->{'tagpool'} //= {map({$_, "File::Information::Tagpool"->_new("instance", $self, "path", $_);} @{$self->_tagpool_path;})}
452 0 0 $found{$stat[6]} //= {}
454 0 0 $found{$stat[6]}{'paths'} //= {}
455 0 0 $found{$stat[6]}{'paths'}{$dir_path} //= []
468 0 0 $found{$stat[0]} //= {}
472 0 0 $found{$stat[0]}{'paths'} //= {}
477 0 0 $self->{'mountinfo_path'} //= "/proc/self/mountinfo"
491 0 0 $found{$dev} //= {}
492 0 0 $entry->{'paths'} //= {}
512 0 0 $entry->{'paths'}{$dir} //= []

or 3 conditions

line l !l&&r !l&&!r condition
166 0 0 0 $id->isa("Data::URIID::Result") or $id->isa("Data::Identifier")
229 0 0 0 $self->{'extractor'} // croak("No extractor available")
237 0 0 0 $self->{'db'} // croak("No database available")
287 14 0 0 $self->{'hash_info'}{$_} or $self->{'hash_info'}{$File::Information::Base::_digest_name_converter{fc $_} // ""}
327 0 0 0 $ENV{$xdg} // $self->{$xdg}
437 0 0 0 $self->{'device_path'} //= "File::Information::Filesystem"->_default_device_search_paths
504 0 0 0 $entry->{'mountpoint'} //= $mountpoint
505 0 0 0 $entry->{'fs_type'} //= $fs_type
506 0 0 0 $entry->{'linux_mount_options'} //= $mount_options
507 0 0 0 $entry->{'linux_superblock_options'} //= $super_options