File Coverage

blib/lib/File/ReplaceBytes.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 11 11 100.0


line stmt bran cond sub pod time code
1             # -*- Perl -*-
2              
3             package File::ReplaceBytes;
4              
5 2     2   82301 use 5.010000;
  2         5  
6 2     2   7 use strict;
  2         2  
  2         27  
7 2     2   5 use warnings;
  2         6  
  2         131  
8              
9             require Exporter;
10             our @ISA = qw(Exporter);
11             our @EXPORT_OK = qw/pread pwrite replacebytes/;
12              
13             our $VERSION = '1.00';
14              
15             require XSLoader;
16             XSLoader::load( 'File::ReplaceBytes', $VERSION );
17              
18             # see ReplaceBytes.xs for the code
19              
20             1;
21             __END__