| blib/lib/Net/WebSocket/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 5 | 80.0 |
| line | l | !l | condition |
|---|---|---|---|
| 136 | 65849 | 76 | $oct2 & 128 && 4 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 203 | 63 | 42 | 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::Load::load($class) unless $class->can('new'); $class } |