Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
AGPL_3.pm	34.53 KB	-rw-r--r--	2017-10-27 15:45
Apache_1_1.pm	3.25 KB	-rw-r--r--	2017-10-27 15:45
Apache_2_0.pm	11.89 KB	-rw-r--r--	2017-10-27 15:45
Artistic_1_0.pm	7.21 KB	-rw-r--r--	2017-10-27 15:45
Artistic_2_0.pm	9.49 KB	-rw-r--r--	2017-10-27 15:45
BSD.pm	2.18 KB	-rw-r--r--	2017-10-27 15:45
CC0_1_0.pm	9.05 KB	-rw-r--r--	2017-10-27 15:45
Custom.pm	8.61 KB	-rw-r--r--	2017-10-27 15:45
EUPL_1_1.pm	13.56 KB	-rw-r--r--	2017-10-27 15:45
EUPL_1_2.pm	14.31 KB	-rw-r--r--	2017-10-27 15:45
FreeBSD.pm	2.05 KB	-rw-r--r--	2017-10-27 15:45
GFDL_1_2.pm	21.16 KB	-rw-r--r--	2017-10-27 15:45
GFDL_1_3.pm	23.6 KB	-rw-r--r--	2017-10-27 15:45
GPL_1.pm	13.11 KB	-rw-r--r--	2017-10-27 15:45
GPL_2.pm	18.47 KB	-rw-r--r--	2017-10-27 15:45
GPL_3.pm	35.11 KB	-rw-r--r--	2017-10-27 15:45
LGPL_2_1.pm	24.76 KB	-rw-r--r--	2017-10-27 15:45
LGPL_3_0.pm	8.53 KB	-rw-r--r--	2017-10-27 15:45
MIT.pm	1.75 KB	-rw-r--r--	2017-10-27 15:45
Mozilla_1_0.pm	20.49 KB	-rw-r--r--	2017-10-27 15:45
Mozilla_1_1.pm	26.68 KB	-rw-r--r--	2017-10-27 15:45
Mozilla_2_0.pm	17.12 KB	-rw-r--r--	2017-10-27 15:45
None.pm	945 B	-rw-r--r--	2017-10-27 15:45
OpenSSL.pm	3.92 KB	-rw-r--r--	2017-10-27 15:45
Perl_5.pm	1.73 KB	-rw-r--r--	2017-10-27 15:45
PostgreSQL.pm	1.73 KB	-rw-r--r--	2017-10-27 15:45
QPL_1_0.pm	5.25 KB	-rw-r--r--	2017-10-27 15:45
SSLeay.pm	3.84 KB	-rw-r--r--	2017-10-27 15:45
Sun.pm	14.98 KB	-rw-r--r--	2017-10-27 15:45
Zlib.pm	1.55 KB	-rw-r--r--	2017-10-27 15:45

Rename

use strict;
use warnings;
package Software::License::Perl_5;
$Software::License::Perl_5::VERSION = '0.103013';
use parent 'Software::License';
# ABSTRACT: The Perl 5 License (Artistic 1 & GPL 1)

require Software::License::GPL_1;
require Software::License::Artistic_1_0;

sub name { 'the same terms as the perl 5 programming language system itself' }
sub url  { 'http://dev.perl.org/licenses/' }
sub meta_name  { 'perl' }
sub meta2_name { 'perl_5' }

sub _gpl {
  my ($self) = @_;
  return $self->{_gpl} ||= Software::License::GPL_1->new({
    year   => $self->year,
    holder => $self->holder,
  });
}

sub _tal {
  my ($self) = @_;
  return $self->{_tal} ||= Software::License::Artistic_1_0->new({
    year   => $self->year,
    holder => $self->holder,
  });
}

=pod

=encoding UTF-8

=head1 NAME

Software::License::Perl_5 - The Perl 5 License (Artistic 1 & GPL 1)

=head1 VERSION

version 0.103013

=head1 AUTHOR

Ricardo Signes <rjbs@cpan.org>

=head1 COPYRIGHT AND LICENSE

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut

__DATA__
__NOTICE__
This software is copyright (c) {{$self->year}} by {{$self->_dotless_holder}}.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
__LICENSE__
Terms of the Perl programming language system itself

a) the GNU General Public License as published by the Free
   Software Foundation; either version 1, or (at your option) any
   later version, or
b) the "Artistic License"

--- {{ $self->_gpl->name }} ---

--- {{ $self->_tal->name }} ---