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 )") |