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.900';
4              
5 5     5   2199 use strict;
  5         16  
  5         147  
6 5     5   21 use warnings;
  5         10  
  5         142  
7 5     5   25 use Carp ();
  5         8  
  5         81  
8 5     5   1930 use parent 'UV::Stream';
  5         1240  
  5         26  
9              
10             sub open
11             {
12 3     3 1 658 my $self = shift;
13 3         14 my ($fh) = @_;
14 3         308 return $self->_open($fh->fileno);
15             }
16              
17             1;
18              
19             __END__