Branch Coverage

blib/lib/Trash/Park.pm
Criterion Covered Total %
branch 1 50 2.0


line true false branch
32 0 1 unless -d $$self{'trash_dir'}
74 0 0 unless $$self{'dbh'}->do($sql, {}, $exptime)
94 0 0 if (-d $item) { }
96 0 0 if -f $_
102 0 0 if ($$self{'opts'}{'i'})
104 0 0 unless ($ans =~ /y/i)
120 0 0 unless -f $file
132 0 0 unless -d $target_dir
134 0 0 if (-e $target)
139 0 0 unless ($overwrite =~ /y/i)
149 0 0 unless defined $dev
152 0 0 if ($$self{'opts'}{'i'})
154 0 0 unless ($ans =~ /y/i)
160 0 0 unless $self->_move_with_force($file, $target)
175 0 0 unless $$self{'dbh'}->do($sql, {}, $file)
189 0 0 if (defined $newer_than)
197 0 0 unless my $sth = $$self{'dbh'}->prepare($sql)
228 0 0 if ($self->_movable($file, 1))
236 0 0 unless (-w $dir)
248 0 0 unless move($file, $target)
252 0 0 unless $old_perms
258 0 0 if $old_perms
272 0 0 if $f_wr || $f_own and $d_wr || $d_own
283 0 0 if (not -d $$self{'trash_idx_dir'})
289 0 0 unless $$self{'dbh'}->do("\n CREATE TABLE trash (\n path char(256), \n move_time int,\n uid int,\n mode int,\n )")