| blib/lib/Net/WebSocket/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 5 | 80.0 |
| line | l | !l | condition |
|---|---|---|---|
| 136 | 65857 | 72 | $oct2 & 128 && 4 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 203 | 63 | 46 | 0 | $self->{'_opcode_class'}{$opcode} ||= do { my $class; if (my $cr = $self->can("OPCODE_CLASS_$opcode")) { $class = &$cr(); } else { die "${self}: Unrecognized frame opcode: \342\200\234$opcode\342\200\235"; } ; &Module::Runtime::require_module($class) unless $class->can("new"); $class } |