File Coverage

blib/lib/Syntax/Feature/Loop.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Syntax::Feature::Loop;
2              
3 5     5   759684 use strict;
  5         11  
  5         206  
4 5     5   33 use warnings;
  5         29  
  5         394  
5              
6 5     5   2365 use version; our $VERSION = qv('v1.10.0');
  5         11948  
  5         42  
7              
8 5     5   587 use XSLoader qw( );
  5         14  
  5         846  
9              
10             XSLoader::load('Syntax::Feature::Loop', $VERSION);
11              
12 4     4   44929 sub import { $^H{ hint_key() } = 1; }
13 2     2   2232 sub unimport { $^H{ hint_key() } = 0; }
14              
15             *install = \&import; # For syntax.pm
16             *uninstall = \&unimport; # For syntax.pm
17              
18             1;
19              
20              
21             __END__