blib/lib/App/tmclean.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 26 | 0.0 |
line | true | false | branch |
---|---|---|---|
21 | 0 | 0 | unless $msg =~ /\n$/ |
36 | 0 | 0 | unless &GetOptions(\my %opt, ('days=i', 'before=s', 'dry-run')) |
49 | 0 | 0 | if (not $self->dry_run and $ENV{'USER'} ne 'root') |
56 | 0 | 0 | unless (@targets) |
77 | 0 | 0 | if ($? != 0) |
94 | 0 | 0 | if ($? != 0) |
100 | 0 | 0 | if ($key eq 'Mount Point') |
119 | 0 | 0 | if ($? != 0) |
131 | 0 | 0 | if ($self->before) |
133 | 0 | 0 | unless $time |
145 | 0 | 0 | $self->dry_run ? : |
146 | 0 | 0 | if (not $self->dry_run) |
147 | 0 | 0 | unless not system(@command) |