File Coverage

blib/lib/Unicode/Collate/Standard/V3_1_1.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package Unicode::Collate::Standard::V3_1_1;
2              
3 2     2   72702 use strict;
  2         6  
  2         117  
4             require Exporter;
5              
6 2     2   12 use vars qw ($VERSION @EXPORT @ISA);
  2         4  
  2         236  
7             $VERSION = '0.1';
8             @EXPORT = qw( &V3_1_1_COLLATION );
9             @ISA = qw( Exporter );
10              
11 2     2   34 use File::Spec;
  2         4  
  2         158  
12              
13              
14             sub V3_1_1_COLLATION {
15 2     2 0 56 File::Spec->catfile("Standard", "V3_1_1.txt");
16             }
17              
18             1;
19              
20             __END__