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   5335 use 5.008_001;
  8         24  
  8         271  
3 8     8   32 use strict;
  8         14  
  8         231  
4 8     8   31 use warnings;
  8         8  
  8         234  
5 8     8   33 use utf8;
  8         10  
  8         57  
6              
7             our $VERSION = '0.15';
8              
9 8     8   361 use base 'Exporter';
  8         11  
  8         1031  
10             our @EXPORT= qw/ALLOWCHARACTER::SPACE/;
11              
12             sub ALLOWCHARACTER::SPACE{
13 6     6   9 '\s';
14             }
15              
16             1;
17              
18             __END__