Branch Coverage

blib/lib/WE_Frontend/Installer.pm
Criterion Covered Total %
branch 0 64 0.0


line true false branch
73 0 0 if (not $self or $self eq 'WE_Frontend::Installer')
77 0 0 unless ($main)
102 0 0 if (not param('tarfile')) { }
108 0 0 if ($@)
151 0 0 unless (defined $tmpdir)
155 0 0 if (-d $extrdir)
159 0 0 unless (-d $extrdir)
162 0 0 unless chdir $extrdir
165 0 0 unless open SP, ">$tarfilename"
178 0 0 if ($tar->get_content($m) =~ /\Q$WE_Frontend::Installer::magiccontent\E/)
184 0 0 if ($is_servicepack) { }
186 0 0 if (not $tar->extract_archive($tarfilename)) { }
214 0 0 if (-e "$dir/install.pl") { }
215 0 0 if (-x "$dir/install.pl") { }
217 0 0 if ($? / 256 != 0)
238 0 0 unless defined $d
239 0 0 unless -d $d and -w $d
280 0 0 unless (defined $destfile)
285 0 0 if (defined $args{-'since'})
288 0 0 unless (defined $since)
309 0 0 if (-d $_ and /^(RCS|CVS|\.svn|headlines|photos)$/ || $File::Find::name =~ m[(we_data/content|html/.+)])
314 0 0 if (-f $_ and /^(\.cvsignore|WEsiteinfo.*\.pm|.*~|\.\#.*)$/ || $File::Find::name =~ m[( we_data/.*\.db$ | we_data/.*\.lock$ )]x)
321 0 0 if (-f $_)
322 0 0 unless &$is_new($_)
330 0 0 unless chdir $rootdir
338 0 0 if $v
343 0 0 if ($args{-'wesiteinfo'})
347 0 0 if (&$is_new($args{-'wesiteinfo'}))
348 0 0 if $v
355 0 0 unless $tar->write($destfile, 9)
362 0 0 unless open F, $f
366 0 0 unless defined $as