Branch Coverage

blib/lib/Sys/Filesystem.pm
Criterion Covered Total %
branch 38 58 65.5


line true false branch
37 0 6 $^O =~ /Win32/i ? :
45 0 6 $ENV{'SYS_FILESYSTEM_DEBUG'} ? :
46 0 6 'darwin' eq $^O ? :
58 0 6 unless UNIVERSAL::isa($qo, $qo)
63 6 0 if $Supported = $FsPlugin ne 'Sys::Filesystem::Unix'
69 1 11 if ref(my $class = shift())
72 1 10 if @_ % 2
75 0 10 if exists $args{'xtab'} and carp('Using xtab is depreciated')
76 0 10 if defined $Sys::Filesystem::FSTAB and not exists $args{'fstab'}
77 0 10 if defined $Sys::Filesystem::MTAB and not exists $args{'mtab'}
78 2 8 if defined $Sys::Filesystem::CANONDEV and not exists $args{'canondev'}
84 1 9 if scalar keys %args
89 9 0 unless defined $$self{'aliases'}
110 0 9 unless $$self{'filesystems'}
120 1 13 unless (defined _INSTANCE($self, 'Sys::Filesystem'))
122 1 0 unless 0 == scalar(@_) % 2
127 0 14 if @_ % 2
132 0 9 unless grep /^$param$/, ('mounted', 'unmounted', 'special', 'device', 'regular')
137 0 14 if (exists $$params{'regular'})
140 0 0 if exists $$params{'special'}
148 5 9 unless keys %{$params;}
157 0 153 !exists($$fs{$requirement}) && exists $$self{'aliases'}{$requirement} ? :
160 74 16 if defined $$params{$requirement} and exists $$fs{$fsreqname} and $$fs{$fsreqname} eq $$params{$requirement} and push @filesystems, $fsname
165 12 67 unless defined $$params{$requirement} or exists $$fs{$fsreqname}
206 0 222 unless blessed $self
207 0 222 unless $fsname
212 0 222 unless exists $$self{'filesystems'}{$fsname}
217 125 97 if exists $$fs{$name}
221 51 46 if exists $$self{'aliases'}{$name} and $name = first(sub { exists $$fs{$_}; } , @{$$self{'aliases'}{$name};})