blib/lib/Net/WebSocket/Parser.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 4 | 5 | 80.0 |
line | l | !l | condition |
---|---|---|---|
126 | 65832 | 71 | $oct2 & 128 && 4 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
187 | 58 | 25 | 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 } |