File Coverage

blib/lib/HTML/FormFu/Constraint/Printable.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 15 15 100.0


line stmt bran cond sub pod time code
1 2     2   783 use strict;
  2         15  
  2         131  
2              
3             package HTML::FormFu::Constraint::Printable;
4             $HTML::FormFu::Constraint::Printable::VERSION = '2.07';
5             # ABSTRACT: Printable Characters Constraint
6              
7 2     2   15 use Moose;
  2         4  
  2         16  
8             extends 'HTML::FormFu::Constraint::Regex';
9              
10             sub regex {
11 8     8 1 37 return qr/^\p{IsPrint}*\z/;
  1     1   8582  
  1         17  
  1         17  
12             }
13              
14             __PACKAGE__->meta->make_immutable;
15              
16             1;
17              
18             __END__
19              
20             =pod
21              
22             =encoding UTF-8
23              
24             =head1 NAME
25              
26             HTML::FormFu::Constraint::Printable - Printable Characters Constraint
27              
28             =head1 VERSION
29              
30             version 2.07
31              
32             =head1 DESCRIPTION
33              
34             Constraint that checks against the unicode C<print> character class,
35             (Alphanumeric, punct, and space).
36              
37             =head1 SEE ALSO
38              
39             Is a sub-class of, and inherits methods from L<HTML::FormFu::Constraint::Regex>,
40             L<HTML::FormFu::Constraint>
41              
42             L<HTML::FormFu>
43              
44             =head1 AUTHOR
45              
46             Carl Franks C<cfranks@cpan.org>
47              
48             =head1 LICENSE
49              
50             This library is free software, you can redistribute it and/or modify it under
51             the same terms as Perl itself.
52              
53             =head1 AUTHOR
54              
55             Carl Franks <cpan@fireartist.com>
56              
57             =head1 COPYRIGHT AND LICENSE
58              
59             This software is copyright (c) 2018 by Carl Franks.
60              
61             This is free software; you can redistribute it and/or modify it under
62             the same terms as the Perl 5 programming language system itself.
63              
64             =cut