File Coverage

blib/lib/UV/UDP.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 25 25 100.0


line stmt bran cond sub pod time code
1             package UV::UDP;
2              
3             our $VERSION = '1.901';
4              
5 4     4   1917 use strict;
  4         14  
  4         120  
6 4     4   19 use warnings;
  4         7  
  4         97  
7 4     4   17 use Carp ();
  4         6  
  4         68  
8 4     4   17 use Exporter qw(import);
  4         11  
  4         119  
9 4     4   1959 use parent 'UV::Handle';
  4         1314  
  4         21  
10              
11             our @EXPORT_OK = (@UV::UDP::EXPORT_XS,);
12              
13             sub open
14             {
15 2     2 1 721 my $self = shift;
16 2         3 my ($fh) = @_;
17 2         14 return $self->_open($fh->fileno);
18             }
19              
20             1;
21              
22             __END__