File Coverage

blib/lib/HTML/FormFu/Constraint/Word.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 11 11 100.0


line stmt bran cond sub pod time code
1             package HTML::FormFu::Constraint::Word;
2              
3 6     6   592 use strict;
  6         11  
  6         312  
4             our $VERSION = '2.05'; # VERSION
5              
6 6     6   24 use Moose;
  6         8  
  6         43  
7             extends 'HTML::FormFu::Constraint::Regex';
8              
9             sub regex {
10 24     24 1 81 return qr/^\w*\z/;
11             }
12              
13             __PACKAGE__->meta->make_immutable;
14              
15             1;
16              
17             __END__
18              
19             =head1 NAME
20              
21             HTML::FormFu::Constraint::Word - Single Word Constraint
22              
23             =head1 VERSION
24              
25             version 2.05
26              
27             =head1 DESCRIPTION
28              
29             Ensure the input is a single word. Which characters are considered "word
30             characters" will depend on the current locale.
31              
32             =head1 SEE ALSO
33              
34             Is a sub-class of, and inherits methods from L<HTML::FormFu::Constraint::Regex>,
35             L<HTML::FormFu::Constraint>
36              
37             L<HTML::FormFu>
38              
39             =head1 AUTHOR
40              
41             Carl Franks C<cfranks@cpan.org>
42              
43             =head1 LICENSE
44              
45             This library is free software, you can redistribute it and/or modify it under
46             the same terms as Perl itself.
47              
48             =cut