Branch Coverage

blib/lib/MogileFS/Test.pm
Criterion Covered Total %
branch 10 58 17.2


line true false branch
26 18 0 unless -d $dir
28 0 0 $ENV{'PERL5LIB'} ? :
31 0 9 unless (eval 'use MogileFS::Client; 1')
36 9 0 unless (eval { do { TrackerHandle::_mogadm_exe() } })
55 5 0 unless ($type)
57 5 0 unless eval 'use DBD::mysql; 1'
61 0 0 unless $type =~ /^\w+$/
64 0 0 if ($@)
70 0 0 unless $rootuser eq ''
71 0 0 unless $rootpass eq ''
92 0 0 if $conn
94 0 0 unless ($pid)
95 0 0 $whoami eq 'root' ? :
107 0 0 if (&$connect())
124 0 1 if $conn
134 1 0 if ($daemonize) { }
138 1 0 if system @args
141 0 0 unless defined $pid
142 0 0 unless ($pid)
148 0 0 if (&$connect())
159 0 0 if &$code()
169 0 0 unless syswrite $admin, $req
172 0 0 if ($r =~ /Now desiring $count children doing '$jobclass'/ and <$admin> eq ".\r\n")
180 0 0 if ($line =~ /\A$jobclass count (\d+)/)
183 0 0 if $line eq ".\r\n"
187 0 0 if $rcount == $count
204 0 0 unless $$self{'pid'}
221 0 9 if $_mogadm_exe_cache
231 0 117 if -x $exe