lib/Ubic.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 6 | 11 | 54.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
320 | 0 | 7 | 0 | -e $self->status_file($name) and $self->status_obj_ro($name)->{'status'} eq $status |
line | l | !l | condition |
---|---|---|---|
341 | 510 | 0 | mkdir $new_dir or die "mkdir $new_dir failed: $!" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
39 | 48 | 9 | 0 | $SINGLETON ||= 'Ubic'->new({}) |
190 | 2 | 0 | 3 | $status_obj->{'enabled'} or not exists $status_obj->{'enabled'} |