File Coverage

blib/lib/Devel/CountOps.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 14 85.7


line stmt bran cond sub pod time code
1             package Devel::CountOps;
2              
3 1     1   20785 use strict;
  1         3  
  1         35  
4 1     1   5 use warnings;
  1         2  
  1         37  
5              
6             our $VERSION = '0.01';
7              
8 1     1   5 use DynaLoader ();
  1         5  
  1         65  
9             our @ISA = qw(DynaLoader);
10              
11             bootstrap Devel::CountOps $VERSION;
12              
13             sub import {
14 0     0     eval 'END { print STDERR "${^_OPCODES_RUN} opcodes run\n" }'
15             }
16              
17             1;
18              
19             __END__