File Coverage

blib/lib/Software/License/Perl_5.pm
Criterion Covered Total %
statement 17 18 94.4
branch n/a
condition 4 6 66.6
subroutine 9 10 90.0
pod 5 5 100.0
total 35 39 89.7


line stmt bran cond sub pod time code
1 11     11   6896 use strict;
  11         19  
  11         245  
2 11     11   41 use warnings;
  11         18  
  11         400  
3             $Software::License::Perl_5::VERSION = '0.104002';
4             use parent 'Software::License';
5 11     11   623 # ABSTRACT: The Perl 5 License (Artistic 1 & GPL 1)
  11         492  
  11         52  
6              
7             require Software::License::GPL_1;
8             require Software::License::Artistic_1_0;
9              
10              
11 22     22 1 49 my ($self) = @_;
12 0     0 1 0 return $self->{_gpl} ||= Software::License::GPL_1->new({
13 43     43 1 119 year => $self->year,
14 42     42 1 93 holder => $self->holder,
15 42     42 1 91 });
16             }
17              
18 4     4   1414 my ($self) = @_;
19 4   66     33 return $self->{_tal} ||= Software::License::Artistic_1_0->new({
20             year => $self->year,
21             holder => $self->holder,
22             });
23             }
24              
25             1;
26 4     4   7622  
27 4   66     39 =pod
28              
29             =encoding UTF-8
30              
31             =head1 NAME
32              
33             Software::License::Perl_5 - The Perl 5 License (Artistic 1 & GPL 1)
34              
35             =head1 VERSION
36              
37             version 0.104002
38              
39             =head1 PERL VERSION
40              
41             This module is part of CPAN toolchain, or is treated as such. As such, it
42             follows the agreement of the Perl Toolchain Gang to require no newer version of
43             perl than v5.8.1. This version may change by agreement of the Toolchain Gang,
44             but for now is governed by the L<Lancaster
45             Consensus|https://github.com/Perl-Toolchain-Gang/toolchain-site/blob/master/lancaster-consensus.md>
46             of 2013.
47              
48             =head1 AUTHOR
49              
50             Ricardo Signes <rjbs@semiotic.systems>
51              
52             =head1 COPYRIGHT AND LICENSE
53              
54             This software is copyright (c) 2022 by Ricardo Signes.
55              
56             This is free software; you can redistribute it and/or modify it under
57             the same terms as the Perl 5 programming language system itself.
58              
59             =cut
60              
61             __NOTICE__
62             This software is copyright (c) {{$self->year}} by {{$self->_dotless_holder}}.
63              
64             This is free software; you can redistribute it and/or modify it under
65             the same terms as the Perl 5 programming language system itself.
66             __LICENSE__
67             Terms of the Perl programming language system itself
68              
69             a) the GNU General Public License as published by the Free
70             Software Foundation; either version 1, or (at your option) any
71             later version, or
72             b) the "Artistic License"
73              
74             --- {{ $self->_gpl->name }} ---
75              
76             {{$self->_gpl->fulltext}}
77              
78             --- {{ $self->_tal->name }} ---
79              
80             {{$self->_tal->fulltext}}