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   2049 use strict;
  3         6  
  3         91  
2 3     3   12 use warnings;
  3         4  
  3         153  
3             package Net::MQTT::Message::PubRel;
4             $Net::MQTT::Message::PubRel::VERSION = '1.163170';
5             # ABSTRACT: Perl module to represent an MQTT PubRel message
6              
7              
8 3     3   15 use base 'Net::MQTT::Message::JustMessageId';
  3         6  
  3         254  
9 3     3   14 use Net::MQTT::Constants qw/:all/;
  3         5  
  3         18  
10              
11             sub message_type {
12 7     7 1 17 6
13             }
14              
15             sub _default_qos {
16 2     2   6 MQTT_QOS_AT_LEAST_ONCE
17             }
18              
19              
20             1;
21              
22             __END__