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 53     53   422 use strict;
  53         129  
  53         2069  
3 53     53   277 use warnings;
  53         128  
  53         2925  
4 53     53   280 use parent 'LINE::Bot::API::Event::Base';
  53         97  
  53         296  
5              
6 1     1 0 5283 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 11 sub beacon_device_message { pack 'H*', $_[0]->{beacon}{dm} }
11              
12             1;