File Coverage

lib/HTML/Object/DOM/Element/Legend.pm
Criterion Covered Total %
statement 22 27 81.4
branch 0 4 0.0
condition n/a
subroutine 8 9 88.8
pod 1 1 100.0
total 31 41 75.6


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## HTML Object - ~/lib/HTML/Object/DOM/Element/Legend.pm
3             ## Version v0.2.0
4             ## Copyright(c) 2021 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2021/12/23
7             ## Modified 2022/09/18
8             ## All rights reserved
9             ##
10             ##
11             ## This program is free software; you can redistribute it and/or modify it
12             ## under the same terms as Perl itself.
13             ##----------------------------------------------------------------------------
14             package HTML::Object::DOM::Element::Legend;
15             BEGIN
16             {
17 1     1   937 use strict;
  1         2  
  1         30  
18 1     1   6 use warnings;
  1         4  
  1         26  
19 1     1   5 use parent qw( HTML::Object::DOM::Element );
  1         3  
  1         5  
20 1     1   66 use vars qw( $VERSION );
  1         2  
  1         49  
21 1     1   7 use HTML::Object::DOM::Element::Shared qw( :legend );
  1         2  
  1         111  
22 1     1   18 our $VERSION = 'v0.2.0';
23             };
24              
25 1     1   5 use strict;
  1         5  
  1         26  
26 1     1   9 use warnings;
  1         3  
  1         103  
27              
28             sub init
29             {
30 0     0 1   my $self = shift( @_ );
31 0           $self->{_init_strict_use_sub} = 1;
32 0 0         $self->SUPER::init( @_ ) || return( $self->pass_error );
33 0 0         $self->{tag} = 'legend' if( !CORE::length( "$self->{tag}" ) );
34 0           return( $self );
35             }
36              
37             # Note: property accessKey inherited
38              
39             # Note: property align inherited
40              
41             # Note: property form inherited
42              
43             1;
44             # NOTE: POD
45             __END__
46              
47             =encoding utf-8
48              
49             =head1 NAME
50              
51             HTML::Object::DOM::Element::Legend - HTML Object DOM Legend Class
52              
53             =head1 SYNOPSIS
54              
55             use HTML::Object::DOM::Element::Legend;
56             my $legend = HTML::Object::DOM::Element::Legend->new ||
57             die( HTML::Object::DOM::Element::Legend->error, "\n" );
58              
59             =head1 VERSION
60              
61             v0.2.0
62              
63             =head1 DESCRIPTION
64              
65             The L<HTML::Object::DOM::Element::Legend> is an interface allowing to access properties of the C<<legend>> elements. It inherits properties and methods from the L<HTML::Object::Element> interface.
66              
67             =head1 INHERITANCE
68              
69             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +------------------------------------+
70             | HTML::Object::Element | --> | HTML::Object::EventTarget | --> | HTML::Object::DOM::Node | --> | HTML::Object::DOM::Element | --> | HTML::Object::DOM::Element::Legend |
71             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +------------------------------------+
72              
73             =head1 PROPERTIES
74              
75             Inherits properties from its parent L<HTML::Object::DOM::Element>
76              
77             =head2 accessKey
78              
79             Is a string representing a single-character access key to give access to the element.
80              
81             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement/accessKey>
82              
83             =head2 align
84              
85             Is a string representing the alignment relative to the form set
86              
87             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement/align>
88              
89             =head2 form
90              
91             Is a L<HTML::Object::DOM::Element::Form> representing the form that this legend belongs to. If the legend has a L<fieldset element|HTML::Object::DOM::Element::FieldSet> as its parent, then this attribute returns the same value as the form attribute on the parent L<fieldset element|HTML::Object::DOM::Element::FieldSet>. Otherwise, it returns C<undef>.
92              
93             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement/form>
94              
95             =head1 METHODS
96              
97             Inherits methods from its parent L<HTML::Object::DOM::Element>
98              
99             =head1 AUTHOR
100              
101             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
102              
103             =head1 SEE ALSO
104              
105             L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement>, L<Mozilla documentation on legend element|https://developer.mozilla.org/en-US/docs/Web/HTML/Element/legend>
106              
107             =head1 COPYRIGHT & LICENSE
108              
109             Copyright(c) 2021 DEGUEST Pte. Ltd.
110              
111             All rights reserved
112              
113             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
114              
115             =cut