blib/lib/Tie/SaveLater.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 20 | 65.0 |
line | true | false | branch |
---|---|---|---|
19 | 0 | 9 | if $@ |
28 | 2 | 4 | if @_ |
29 | 6 | 0 | $OPTIONS{0 + $self} ? : |
47 | 0 | 18 | unless my $filename = shift() |
49 | 12 | 6 | if (-f $filename) { } |
50 | 0 | 12 | unless $self = $class->load($filename) |
52 | 0 | 12 | if $types2check{$type} and not $self->isa($type) |
58 | 0 | 18 | if $DEBUG |
59 | 2 | 16 | if @_ |
67 | 0 | 18 | if $DEBUG |