File Coverage

blib/lib/Encode/HP.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Encode::HP;
2 1     1   113859 use 5.007003;
  1         3  
  1         51  
3             our $VERSION = '0.03';
4 1     1   5 use Encode;
  1         2  
  1         105  
5 1     1   7 use XSLoader;
  1         7  
  1         208  
6             XSLoader::load(__PACKAGE__,$VERSION);
7              
8             Encode::define_alias( qr/\bgreek8$/i => '"hp-greek8"' );
9             Encode::define_alias( qr/\br(oman)?8$/i => '"hp-roman8"' );
10             Encode::define_alias( qr/\br(oman)?9$/i => '"hp-roman9"' );
11             Encode::define_alias( qr/\bthai8$/i => '"hp-thai8"' );
12             Encode::define_alias( qr/\bturkish8$/i => '"hp-turkish8"' );
13              
14             1;
15             __END__