File Coverage

blib/lib/Protocol/BitTorrent/Message/Keepalive.pm
Criterion Covered Total %
statement 11 12 91.6
branch n/a
condition n/a
subroutine 5 6 83.3
pod 1 3 33.3
total 17 21 80.9


line stmt bran cond sub pod time code
1             package Protocol::BitTorrent::Message::Keepalive;
2             {
3             $Protocol::BitTorrent::Message::Keepalive::VERSION = '0.004';
4             }
5 1     1   6 use strict;
  1         2  
  1         35  
6 1     1   4 use warnings FATAL => 'all', NONFATAL => 'redefine';
  1         2  
  1         31  
7 1     1   781 use parent qw(Protocol::BitTorrent::Message);
  1         320  
  1         6  
8              
9             =head1 NAME
10              
11             Protocol::BitTorrent::Message::Keepalive - simple keepalive packet
12              
13             =head1 VERSION
14              
15             version 0.004
16              
17             =cut
18              
19             =head1 METHODS
20              
21             =cut
22              
23             =head2 new
24              
25             =cut
26              
27 0     0 0 0 sub new_from_data { $_[0]->new }
28              
29 2     2 1 10 sub type { 'keepalive' }
30 1     1 0 8 sub packet_length { 0 }
31              
32             1;
33              
34             __END__