File Coverage

blib/lib/Text/Levenshtein/Flexible.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 2 2 100.0
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Text::Levenshtein::Flexible;
2              
3 2     2   60444 use 5.008008;
  2         6  
  2         60  
4 2     2   10 use strict;
  2         2  
  2         45  
5 2     2   9 use warnings;
  2         6  
  2         58  
6 2     2   9 use Carp;
  2         3  
  2         507  
7              
8             require Exporter;
9              
10             our @ISA = qw(Exporter);
11              
12             our %EXPORT_TAGS = (
13             'all' => [
14             qw/
15             levenshtein
16             levenshtein_c
17             levenshtein_l
18             levenshtein_lc
19             levenshtein_l_all
20             levenshtein_lc_all
21             /
22             ]
23             );
24              
25             our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
26              
27             our $VERSION = '0.09';
28              
29             require XSLoader;
30             XSLoader::load('Text::Levenshtein::Flexible', $VERSION);
31              
32             sub levenshtein_l_all {
33 3     3 1 7330 Text::Levenshtein::Flexible->new(shift)->distance_l_all(@_);
34             }
35              
36             sub levenshtein_lc_all {
37 3     3 1 805 Text::Levenshtein::Flexible->new(splice(@_, 0, 4))->distance_lc_all(@_);
38             }
39              
40             1;
41             __END__