File Coverage

blib/lib/Net/WebSocket/Frame/continuation.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Net::WebSocket::Frame::continuation;
2              
3             =encoding utf-8
4              
5             =HEAD1
6              
7             Net::WebSocket::Frame::continuation
8              
9             =head1 SYNOPSIS
10              
11             my $frm = Net::WebSocket::Frame::continuation->new(
12              
13             fin => 1, #default
14              
15             #Optional, can be either empty (default) or four random bytes
16             mask => q<>,
17              
18             payload_sr => \$payload,
19             );
20              
21             $frm->get_type(); #"continuation"
22              
23             $frm->is_control_frame(); #0
24              
25             my $mask = $frm->get_mask_bytes();
26              
27             my $payload = $frm->get_payload();
28              
29             my $serialized = $frm->to_bytes();
30              
31             $frm->set_fin(); #turns on
32              
33             =cut
34              
35 2     2   427 use strict;
  2         6  
  2         59  
36 2     2   12 use warnings;
  2         4  
  2         61  
37              
38 2         13 use parent qw(
39             Net::WebSocket::Base::DataFrame
40 2     2   12 );
  2         5  
41              
42 2     2   114 use constant get_opcode => 0;
  2         6  
  2         106  
43              
44             1;