File Coverage

blib/lib/Software/License/Apache_2_0.pm
Criterion Covered Total %
statement 20 21 95.2
branch n/a
condition n/a
subroutine 8 9 88.8
pod 6 6 100.0
total 34 36 94.4


line stmt bran cond sub pod time code
1 11     11   79853 use strict;
  11         31  
  11         377  
2 11     11   65 use warnings;
  11         24  
  11         576  
3             package Software::License::Apache_2_0;
4             $Software::License::Apache_2_0::VERSION = '0.104001';
5 11     11   557 use parent 'Software::License';
  11         351  
  11         60  
6             # ABSTRACT: The Apache License, Version 2.0
7              
8 23     23 1 209 sub name { 'The Apache License, Version 2.0, January 2004' }
9 0     0 1 0 sub url { 'http://www.apache.org/licenses/LICENSE-2.0.txt' }
10 43     43 1 140 sub meta_name { 'apache' }
11 42     42 1 111 sub meta2_name { 'apache_2_0' }
12 43     43 1 129 sub spdx_expression { 'Apache-2.0' }
13              
14             sub fulltext {
15 1     1 1 9 my ($self) = @_;
16              
17 1         6 my $txt = $self->SUPER::fulltext();
18              
19 1         4247 my $year = $self->year;
20 1         4 my $holder = $self->holder;
21              
22 1         69 $txt =~ s{\Q[yyyy]\E}{$year}g;
23 1         89 $txt =~ s{\Q[name of copyright owner]\E}{$holder}g;
24              
25 1         24 return $txt;
26             }
27              
28             1;
29              
30             =pod
31              
32             =encoding UTF-8
33              
34             =head1 NAME
35              
36             Software::License::Apache_2_0 - The Apache License, Version 2.0
37              
38             =head1 VERSION
39              
40             version 0.104001
41              
42             =head1 AUTHOR
43              
44             Ricardo Signes
45              
46             =head1 COPYRIGHT AND LICENSE
47              
48             This software is copyright (c) 2021 by Ricardo Signes.
49              
50             This is free software; you can redistribute it and/or modify it under
51             the same terms as the Perl 5 programming language system itself.
52              
53             =cut
54              
55             __DATA__