| blib/lib/open/layers.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 22 | 30 | 73.3 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 2 | 26 | if (ref $arg or ref \$arg eq 'GLOB') { } |
| 16 | 10 | elsif ($arg =~ /\ASTD(IN|OUT|ERR|IO)\z/) { } | |
| 10 | 0 | elsif ($arg =~ /\A(rw|r|w)\z/) { } | |
| 19 | 0 | 2 | unless @_ |
| 21 | 0 | 2 | unless $layer =~ /$LAYERS_SPEC/ |
| 22 | 0 | 2 | unless binmode $arg, $layer |
| 25 | 0 | 16 | unless @_ |
| 27 | 0 | 16 | unless $layer =~ /$LAYERS_SPEC/ |
| 28 | 4 | 3 | $which eq 'ERR' ? : |
| 5 | 7 | $which eq 'OUT' ? : | |
| 4 | 12 | $which eq 'IN' ? : | |
| 35 | 0 | 10 | unless @_ |
| 37 | 0 | 10 | unless $layer =~ /$LAYERS_SPEC/ |
| 40 | 8 | 2 | if ($which ne 'w') |
| 43 | 8 | 2 | if ($which ne 'r') |