File Coverage

blib/lib/Net/MQTT/Message/PubRel.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1 3     3   1560 use strict;
  3         3  
  3         89  
2 3     3   9 use warnings;
  3         5  
  3         103  
3             package Net::MQTT::Message::PubRel;
4             $Net::MQTT::Message::PubRel::VERSION = '1.143250';
5             # ABSTRACT: Perl module to represent an MQTT PubRel message
6              
7              
8 3     3   10 use base 'Net::MQTT::Message::JustMessageId';
  3         2  
  3         175  
9 3     3   11 use Net::MQTT::Constants qw/:all/;
  3         3  
  3         13  
10              
11             sub message_type {
12 7     7 1 13 6
13             }
14              
15             sub _default_qos {
16 2     2   7 MQTT_QOS_AT_LEAST_ONCE
17             }
18              
19              
20             1;
21              
22             __END__