File Coverage

lib/HTML/Object/DOM/Element/HTML.pm
Criterion Covered Total %
statement 26 27 96.3
branch 1 2 50.0
condition n/a
subroutine 9 10 90.0
pod 2 2 100.0
total 38 41 92.6


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## HTML Object - ~/lib/HTML/Object/DOM/Element/HTML.pm
3             ## Version v0.2.0
4             ## Copyright(c) 2022 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2022/01/05
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::HTML;
15             BEGIN
16             {
17 14     14   12737 use strict;
  14         37  
  14         564  
18 14     14   138 use warnings;
  14         40  
  14         700  
19 14     14   96 use parent qw( HTML::Object::DOM::Element );
  14         32  
  14         175  
20 14     14   1484 use vars qw( $VERSION );
  14         33  
  14         852  
21 14     14   7404 use HTML::Object::DOM::Element::Shared qw( :anchor );
  14         45  
  14         4451  
22 14     14   313 our $VERSION = 'v0.2.0';
23             };
24              
25 14     14   115 use strict;
  14         30  
  14         309  
26 14     14   69 use warnings;
  14         31  
  14         1595  
27              
28             sub init
29             {
30 18     18 1 1670 my $self = shift( @_ );
31 18         1987 $self->{_init_strict_use_sub} = 1;
32 18 50       208 $self->SUPER::init( @_ ) || return( $self->pass_error );
33 18         79 return( $self );
34             }
35              
36             # Note: property version
37 0     0 1   sub version : lvalue { return( shift->_set_get_property( 'version', @_ ) ); }
38              
39             1;
40             # NOTE: POD
41             __END__
42              
43             =encoding utf-8
44              
45             =head1 NAME
46              
47             HTML::Object::DOM::Element::HTML - HTML Object DOM HTML Class
48              
49             =head1 SYNOPSIS
50              
51             use HTML::Object::DOM::Element::HTML;
52             my $html = HTML::Object::DOM::Element::HTML->new ||
53             die( HTML::Object::DOM::Element::HTML->error, "\n" );
54              
55             =head1 VERSION
56              
57             v0.2.0
58              
59             =head1 DESCRIPTION
60              
61             The L<HTML::Object::DOM::Element::Html> interface serves as the root node for a given HTML document. This object inherits the properties and methods described in the L<HTML::Object::DOM::Element> interface.
62              
63             =head1 INHERITANCE
64              
65             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +----------------------------------+
66             | HTML::Object::Element | --> | HTML::Object::EventTarget | --> | HTML::Object::DOM::Node | --> | HTML::Object::DOM::Element | --> | HTML::Object::DOM::Element::HTML |
67             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +----------------------------------+
68              
69             =head1 PROPERTIES
70              
71             Inherits properties from its parent L<HTML::Object::DOM::Element>
72              
73             =head2 version
74              
75             Is a string representing the version of the HTML Document Type Definition (DTD) that governs this document. This property should not be used any more as it is non-conforming. Omit it.
76              
77             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLHtmlElement/version>
78              
79             =head1 METHODS
80              
81             Inherits methods from its parent L<HTML::Object::DOM::Element>
82              
83             =head1 AUTHOR
84              
85             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
86              
87             =head1 SEE ALSO
88              
89             L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLHTmlElement>, L<Mozilla documentation on hr element|https://developer.mozilla.org/en-US/docs/Web/HTML/Element/html>
90              
91             =head1 COPYRIGHT & LICENSE
92              
93             Copyright(c) 2022 DEGUEST Pte. Ltd.
94              
95             All rights reserved
96              
97             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
98              
99             =cut