File Coverage

blib/lib/Regexp/Compare.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 11 12 91.6


line stmt bran cond sub pod time code
1             package Regexp::Compare;
2              
3             require 5.036_000;
4 1     1   6454 use strict;
  1         2  
  1         40  
5 1     1   11 use warnings;
  1         2  
  1         275  
6              
7             require Exporter;
8              
9             our @ISA = qw(Exporter);
10              
11             our @EXPORT_OK = qw(is_less_or_equal);
12             our @EXPORT = qw();
13              
14             our $VERSION = '0.36';
15              
16             require XSLoader;
17             XSLoader::load('Regexp::Compare', $VERSION);
18              
19             sub is_less_or_equal {
20 9173     9173 0 16524927 local ${^RE_TRIE_MAXBUF} = -1;
21 9173         378832 return Regexp::Compare::_is_less_or_equal(@_);
22             }
23              
24             1;
25             __END__