File Coverage

blib/lib/Net/WebSocket/X/ReceivedBadControlFrame.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Net::WebSocket::X::ReceivedBadControlFrame;
2              
3 2     2   963 use strict;
  2         4  
  2         64  
4 2     2   7 use warnings;
  2         4  
  2         45  
5              
6 2     2   7 use parent qw( Net::WebSocket::X::Base );
  2         3  
  2         9  
7              
8             sub _new {
9 2     2   302 my ($class, $txt, $frame) = @_;
10              
11 2         10 return $class->SUPER::_new( $txt, frame => $frame );
12             }
13              
14             1;