File Coverage

tlib/Test_Manual_Hints.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 14 100.0


line stmt bran cond sub pod time code
1             package Test_Manual_Hints;
2              
3 1     1   38772 use 5.010; use warnings;
  1     1   5  
  1         56  
  1         7  
  1         3  
  1         41  
4 1     1   665 use Lexical::Hints;
  1         3  
  1         5  
5              
6             # Initialize module's hints...
7             sub import {
8 1     1   34 $^H{'Test_Manual_Hints'} = 1;
9             }
10              
11             1;