File Coverage

blib/lib/PerlIO/fgets.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package PerlIO::fgets;
2 2     2   44480 use strict;
  2         7  
  2         121  
3 2     2   13 use warnings;
  2         4  
  2         232  
4              
5             BEGIN {
6 2     2   5 our $VERSION = '0.02';
7 2         11 our @EXPORT = qw[fgets];
8              
9 2         20 require XSLoader; XSLoader::load(__PACKAGE__, $VERSION);
  2         1342  
10              
11 2         20 require Exporter;
12 2         65 *import = \&Exporter::import;
13             }
14              
15             1;
16              
17             __END__