| lib/File/Data.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 23 | 52 | 44.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 526 | 0 | 0 | 5 | defined $$self{'_var'}{$call} and ref $$self{'_var'}{$call} eq 'ARRAY' |
| 911 | 0 | 4518 | 0 | $debug =~ /^(\d+)$/o and $1 >= 1 |
| 0 | 4518 | 0 | $debug =~ /^(.+)$/o and $state =~ /$debug/ | |
| 969 | 21 | 0 | 0 | ref $c_ref and $c_ref->can($state) |
| 1143 | 15 | 536 | 0 | $i_ok and $self->_var('backup') |
| 1164 | 0 | 0 | 552 | $file =~ /.+/o && $perm =~ /.+/o |
| line | l | !l | condition |
|---|---|---|---|
| 161 | 0 | 556 | shift() || {} |
| 591 | 0 | 0 | shift() || '_' |
| 602 | 0 | 0 | shift() || '_' |
| 998 | 554 | 2 | shift() || '' |
| 1007 | 0 | 552 | $self->_var('filename') || '' |
| 1023 | 552 | 0 | shift() || '' |
| 1048 | 552 | 0 | shift() || {} |
| 1208 | 538 | 13 | 'FileHandle'->new("$perm $file") || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 160 | 25 | 0 | 531 | shift() || $File::Data::PERMISSIONS |
| 524 | 5 | 0 | 0 | uc shift() || $self->_var('last') |
| 911 | 0 | 0 | 4518 | $debug =~ /^(\d+)$/o and $1 >= 1 or $debug =~ /^(.+)$/o and $state =~ /$debug/ |
| 945 | 21 | 0 | 0 | shift() || $self->_var('state') |
| 947 | 0 | 0 | 21 | $$self{'_err'}{$state} || $$self{'_err'}{'default'} |
| 1034 | 6 | 546 | 0 | $map{$args} || $args |