File Coverage

blib/lib/HTML/Tag/HIDDEN.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 18 100.0


line stmt bran cond sub pod time code
1             package HTML::Tag::HIDDEN;
2              
3 1     1   8 use strict;
  1         2  
  1         57  
4 1     1   6 use warnings;
  1         2  
  1         72  
5              
6             our $VERSION = '1.00';
7              
8 1     1   6 use Class::AutoAccess;
  1         2  
  1         114  
9 1     1   6 use base qw(Class::AutoAccess HTML::Tag);
  1         2  
  1         225  
10              
11             BEGIN {
12 1     1   49 our $class_def = {
13             element => 'HIDDEN',
14             tag => 'INPUT',
15             type => 'hidden',
16             has_end_tag => 0,
17             value => '',
18             attributes => ['type','value'],
19             }
20             }
21              
22             1;
23              
24             # vim: set ts=2: