File Coverage

blib/lib/FormValidator/Simple/Struct/AllowCharacter.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 22 22 100.0


line stmt bran cond sub pod time code
1             package FormValidator::Simple::Struct::AllowCharacter;
2 8     8   9263 use 5.008_001;
  8         33  
  8         449  
3 8     8   56 use strict;
  8         19  
  8         379  
4 8     8   110 use warnings;
  8         20  
  8         407  
5 8     8   51 use utf8;
  8         15  
  8         110  
6              
7             our $VERSION = '0.14';
8              
9 8     8   589 use base 'Exporter';
  8         24  
  8         1470  
10             our @EXPORT= qw/ALLOWCHARACTER::SPACE/;
11              
12             sub ALLOWCHARACTER::SPACE{
13 6     6   15 '\s';
14             }
15              
16             1;
17              
18             __END__