File Coverage

blib/lib/LINE/Bot/API/Event/BeaconDetection.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 4 0.0
total 20 24 83.3


line stmt bran cond sub pod time code
1             package LINE::Bot::API::Event::BeaconDetection;
2 47     47   320 use strict;
  47         107  
  47         1310  
3 47     47   231 use warnings;
  47         98  
  47         1132  
4 47     47   231 use parent 'LINE::Bot::API::Event::Base';
  47         94  
  47         225  
5              
6 1     1 0 4355 sub is_beacon_detection_event { 1 }
7              
8 1     1 0 7 sub beacon_hwid { $_[0]->{beacon}{hwid} }
9 1     1 0 6 sub beacon_type { $_[0]->{beacon}{type} }
10 1     1 0 12 sub beacon_device_message { pack 'H*', $_[0]->{beacon}{dm} }
11              
12             1;