File Coverage

lib/HTML/Object/DOM/Element/Span.pm
Criterion Covered Total %
statement 24 24 100.0
branch 2 4 50.0
condition n/a
subroutine 8 8 100.0
pod 1 1 100.0
total 35 37 94.5


line stmt bran cond sub pod time code
1             ##----------------------------------------------------------------------------
2             ## HTML Object - ~/lib/HTML/Object/DOM/Element/Span.pm
3             ## Version v0.2.0
4             ## Copyright(c) 2022 DEGUEST Pte. Ltd.
5             ## Author: Jacques Deguest <jack@deguest.jp>
6             ## Created 2022/01/06
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::Span;
15             BEGIN
16             {
17 8     8   6960 use strict;
  8         23  
  8         331  
18 8     8   71 use warnings;
  8         25  
  8         432  
19 8     8   52 use parent qw( HTML::Object::DOM::Element );
  8         32  
  8         94  
20 8     8   790 use vars qw( $VERSION );
  8         21  
  8         552  
21 8     8   207 our $VERSION = 'v0.2.0';
22             };
23              
24 8     8   52 use strict;
  8         18  
  8         272  
25 8     8   57 use warnings;
  8         21  
  8         1278  
26              
27             sub init
28             {
29 10     10 1 917 my $self = shift( @_ );
30 10         935 $self->{_init_strict_use_sub} = 1;
31 10 50       98 $self->SUPER::init( @_ ) || return( $self->pass_error );
32 10 50       50 $self->{tag} = 'span' if( !CORE::length( "$self->{tag}" ) );
33 10         124 return( $self );
34             }
35              
36             1;
37             # NOTE: POD
38             __END__
39              
40             =encoding utf-8
41              
42             =head1 NAME
43              
44             HTML::Object::DOM::Element::Span - HTML Object DOM Span Class
45              
46             =head1 SYNOPSIS
47              
48             use HTML::Object::DOM::Element::Span;
49             my $span = HTML::Object::DOM::Element::Span->new ||
50             die( HTML::Object::DOM::Element::Span->error, "\n" );
51              
52             =head1 VERSION
53              
54             v0.2.0
55              
56             =head1 DESCRIPTION
57              
58             This interface represents a <span> element and derives from the L<HTML::Object::DOM::Element> interface, but without implementing any additional properties or methods.
59              
60             =head1 INHERITANCE
61              
62             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +----------------------------------+
63             | HTML::Object::Element | --> | HTML::Object::EventTarget | --> | HTML::Object::DOM::Node | --> | HTML::Object::DOM::Element | --> | HTML::Object::DOM::Element::Span |
64             +-----------------------+ +---------------------------+ +-------------------------+ +----------------------------+ +----------------------------------+
65              
66             =head1 PROPERTIES
67              
68             Inherits properties from its parent L<HTML::Object::DOM::Element>
69              
70             =head1 METHODS
71              
72             Inherits methods from its parent L<HTML::Object::DOM::Element>
73              
74             =head1 AUTHOR
75              
76             Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>
77              
78             =head1 SEE ALSO
79              
80             L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLSpanElement>, L<Mozilla documentation on span element|https://developer.mozilla.org/en-US/docs/Web/HTML/Element/span>
81              
82             =head1 COPYRIGHT & LICENSE
83              
84             Copyright(c) 2022 DEGUEST Pte. Ltd.
85              
86             All rights reserved
87              
88             This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
89              
90             =cut