File Coverage

lib/HTML/Object/DOM/Element/Mod.pm
Criterion Covered Total %
statement 19 26 73.0
branch 0 4 0.0
condition n/a
subroutine 7 10 70.0
pod 3 3 100.0
total 29 43 67.4


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## HTML Object - ~/lib/HTML/Object/DOM/Element/Mod.pm
3             ## Version v0.2.0
4             ## Copyright(c) 2022 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2022/01/10
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::Mod;
15             BEGIN
16             {
17 1     1   1004 use strict;
  1         5  
  1         29  
18 1     1   10 use warnings;
  1         155  
  1         36  
19 1     1   6 use parent qw( HTML::Object::DOM::Element );
  1         2  
  1         5  
20 1     1   66 use vars qw( $VERSION );
  1         2  
  1         50  
21 1     1   22 our $VERSION = 'v0.2.0';
22             };
23              
24 1     1   5 use strict;
  1         1  
  1         17  
25 1     1   4 use warnings;
  1         5  
  1         148  
26              
27             sub init
28             {
29 0     0 1   my $self = shift( @_ );
30 0           $self->{_init_strict_use_sub} = 1;
31 0 0         $self->SUPER::init( @_ ) || return( $self->pass_error );
32 0 0         $self->{tag} = 'mod' if( !CORE::length( "$self->{tag}" ) );
33 0           return( $self );
34             }
35              
36             # Note: property cite
37 0     0 1   sub cite : lvalue { return( shift->_set_get_property( 'cite', @_ ) ); }
38              
39             # Note: property dateTime
40 0     0 1   sub dateTime : lvalue { return( shift->_set_get_property({ attribute => 'datetime', is_datetime => 1 }, @_ ) ); }
41              
42             1;
43             # NOTE: POD
44             __END__
45              
46             =encoding utf-8
47              
48             =head1 NAME
49              
50             HTML::Object::DOM::Element::Mod - HTML Object DOM Mod Class
51              
52             =head1 SYNOPSIS
53              
54             use HTML::Object::DOM::Element::Mod;
55             my $mod = HTML::Object::DOM::Element::Mod->new ||
56             die( HTML::Object::DOM::Element::Mod->error, "\n" );
57              
58             =head1 VERSION
59              
60             v0.2.0
61              
62             =head1 DESCRIPTION
63              
64             This interface provides special properties (beyond the regular methods and properties available through the L<HTML::Object::DOM::Element> interface they also have available to them by inheritance) for manipulating modification elements, that is <del> and <ins>.
65              
66             =head1 INHERITANCE
67              
68             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +---------------------------------+
69             | HTML::Object::Element | --> | HTML::Object::EventTarget | --> | HTML::Object::DOM::Node | --> | HTML::Object::DOM::Element | --> | HTML::Object::DOM::Element::Mod |
70             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +---------------------------------+
71              
72             =head1 PROPERTIES
73              
74             Inherits properties from its parent L<HTML::Object::DOM::Element>
75              
76             =head2 cite
77              
78             Is a string reflecting the cite HTML attribute, containing a URI of a resource explaining the change.
79              
80             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement/cite>
81              
82             =head2 dateTime
83              
84             Is a string reflecting the datetime HTML attribute, containing a date-and-time string representing a timestamp for the change.
85              
86             See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement/dateTime>
87              
88             =head1 METHODS
89              
90             Inherits methods from its parent L<HTML::Object::DOM::Element>
91              
92             =head1 AUTHOR
93              
94             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
95              
96             =head1 SEE ALSO
97              
98             L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement>, L<Mozilla documentation on mod element|https://developer.mozilla.org/en-US/docs/Web/HTML/Element/mod>
99              
100             =head1 COPYRIGHT & LICENSE
101              
102             Copyright(c) 2022 DEGUEST Pte. Ltd.
103              
104             All rights reserved
105              
106             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
107              
108             =cut