blib/lib/DiaColloDB/EnumFile/Tied.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 16 | 0.0 |
line | true | false | branch |
---|---|---|---|
22 | 0 | 0 | if (@_ == 1) { } |
27 | 0 | 0 | unless UNIVERSAL::isa($class, 'DiaColloDB::EnumFile') |
29 | 0 | 0 | unless $enum = $class->new(%opts) |
43 | 0 | 0 | ref $that ? : |
0 | 0 | unless my $enum = ref $that ? $that : $that->tienew(@_) | |
105 | 0 | 0 | if $_[1] >= ${$_[0];}->size |
174 | 0 | 0 | if $_[2] >= ${$_[0];}->size |
192 | 0 | 0 | if not defined $i or ++$i >= ${$_[0];}->size |