Branch Coverage

blib/lib/App/bk.pm
Criterion Covered Total %
branch 31 48 64.5


line true false branch
64 0 9 unless GetOptions \%options, keys %opts
66 0 9 if $options{'version'}
67 0 9 if $options{'?'} or $options{'help'}
68 0 9 if $options{'HELP'} or $options{'man'}
71 0 9 if $options{'debug'} > 8
73 1 8 unless (@ARGV)
92 2 9 unless (-f $filename)
97 0 9 unless ($savedir)
105 0 9 if ($options{'diff'})
106 0 0 if (not $last_backup) { }
115 6 3 if ($last_backup)
124 3 3 if ($last_backup_sum eq $current_sum)
131 0 6 if $options{'username'}
133 3 3 if (-f $savefilename)
140 0 6 if (system("cp $filename $savefilename") != 0)
148 0 8 if ($options{'edit'})
170 9 56 if $level <= $options{'debug'}
195 1 13 unless $filename
197 3 10 unless ($options{'sum'})
231 0 0 $differences ? :
245 1 15 unless ($savedir and -d $savedir)
251 0 15 unless opendir my $savedir_fh, $savedir
256 0 15 unless closedir $savedir_fh
258 0 15 if ($options{'debug'} > 2)