| File: | lib/Net/MQTT/Message/PubRel.pm |
| Coverage: | 100.0% |
| line | stmt | bran | cond | sub | pod | time | code |
|---|---|---|---|---|---|---|---|
| 1 | 3 3 3 | 3298 21 225 | use strict; | ||||
| 2 | 3 3 3 | 37 17 449 | use warnings; | ||||
| 3 | package Net::MQTT::Message::PubRel; | ||||||
| 4 | |||||||
| 5 | # ABSTRACT: Perl module to represent an MQTT PubRel message | ||||||
| 6 | |||||||
| 7 - 17 | =head1 SYNOPSIS # instantiated by Net::MQTT::Message =head1 DESCRIPTION This module encapsulates a single MQTT Publish Release message. It is a specific subclass used by L<Net::MQTT::Message> and should not need to be instantiated directly. =cut | ||||||
| 18 | |||||||
| 19 | 3 3 3 | 41 14 638 | use base 'Net::MQTT::Message::JustMessageId'; | ||||
| 20 | 3 3 3 | 42 16 101 | use Net::MQTT::Constants qw/:all/; | ||||
| 21 | |||||||
| 22 | sub message_type { | ||||||
| 23 | 7 | 177 | 6 | ||||
| 24 | } | ||||||
| 25 | |||||||
| 26 | sub _default_qos { | ||||||
| 27 | 2 | 64 | MQTT_QOS_AT_LEAST_ONCE | ||||
| 28 | } | ||||||
| 29 | |||||||
| 30 | =method C<message_id()> | ||||||
| 31 | |||||||
| 32 | Returns the message id field of the MQTT Publish Release message. | ||||||
| 33 | |||||||
| 34 | =cut | ||||||
| 35 | |||||||
| 36 | 1; | ||||||