File Coverage

blib/lib/AnyEvent/Finger/Response.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 2 2 100.0
total 14 14 100.0


line stmt bran cond sub pod time code
1             package AnyEvent::Finger::Response;
2              
3 5     5   30 use strict;
  5         9  
  5         133  
4 5     5   21 use warnings;
  5         50  
  5         452  
5              
6             # ABSTRACT: Simple asynchronous finger response
7             our $VERSION = '0.14'; # VERSION
8              
9              
10             sub say
11             {
12 23     23 1 57 shift->(\@_);
13             }
14              
15              
16             sub done
17             {
18 9     9 1 23 shift->();
19             }
20              
21             1;
22              
23             __END__