File Coverage

blib/lib/UV/Pipe.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 21 21 100.0


line stmt bran cond sub pod time code
1             package UV::Pipe;
2              
3             our $VERSION = '1.902';
4              
5 5     5   2357 use strict;
  5         14  
  5         162  
6 5     5   25 use warnings;
  5         14  
  5         113  
7 5     5   22 use Carp ();
  5         7  
  5         92  
8 5     5   1882 use parent 'UV::Stream';
  5         1293  
  5         25  
9              
10             sub open
11             {
12 3     3 1 746 my $self = shift;
13 3         23 my ($fh) = @_;
14 3         330 return $self->_open($fh->fileno);
15             }
16              
17             1;
18              
19             __END__