File Coverage

blib/lib/Net/Async/Slack/Event/ReconnectURL.pm
Criterion Covered Total %
statement 13 15 86.6
branch n/a
condition 0 3 0.0
subroutine 5 7 71.4
pod 0 3 0.0
total 18 28 64.2


line stmt bran cond sub pod time code
1             package Net::Async::Slack::Event::ReconnectURL;
2              
3 4     4   263333 use strict;
  4         7  
  4         178  
4 4     4   20 use warnings;
  4         7  
  4         367  
5              
6             our $VERSION = '0.015'; # VERSION
7              
8             =head1 NAME
9              
10             Net::Async::Slack::Event::ReconnectURL - Experimental
11              
12             =head1 DESCRIPTION
13              
14             Example input data:
15              
16             {
17             "type": "reconnect_url"
18             }
19              
20              
21             =cut
22              
23 4     4   624 use URI;
  4         4798  
  4         130  
24              
25 4     4   452 use Net::Async::Slack::EventType;
  4         12  
  4         34  
26              
27 0     0 0 0 sub url { shift->{url} }
28              
29 0   0 0 0 0 sub uri { $_[0]->{uri} //= URI->new($_[0]->url) }
30              
31 8     8 0 31 sub type { 'reconnect_url' }
32              
33             1;
34