File Coverage

blib/lib/HTML/FormFu/Constraint/Bool.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::Bool;
2              
3 3     3   732 use strict;
  3         8  
  3         134  
4             our $VERSION = '2.05'; # VERSION
5              
6 3     3   11 use Moose;
  3         5  
  3         17  
7             extends 'HTML::FormFu::Constraint::Regex';
8              
9             sub regex {
10 12     12 1 50 return qr/^[01]?\z/;
11             }
12              
13             __PACKAGE__->meta->make_immutable;
14              
15             1;
16              
17             __END__
18              
19             =head1 NAME
20              
21             HTML::FormFu::Constraint::Bool - Boolean Constraint
22              
23             =head1 VERSION
24              
25             version 2.05
26              
27             =head1 DESCRIPTION
28              
29             Value must be either 1 or 0.
30              
31             =head1 SEE ALSO
32              
33             Is a sub-class of, and inherits methods from L<HTML::FormFu::Constraint::Regex>,
34             L<HTML::FormFu::Constraint>
35              
36             L<HTML::FormFu>
37              
38             =head1 AUTHOR
39              
40             Carl Franks C<cfranks@cpan.org>
41              
42             =head1 LICENSE
43              
44             This library is free software, you can redistribute it and/or modify it under
45             the same terms as Perl itself.
46              
47             =cut