diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm | 116 |
1 files changed, 116 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm b/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm new file mode 100644 index 00000000000..d3575e5e7e8 --- /dev/null +++ b/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm @@ -0,0 +1,116 @@ +use 5.006; +use strict; +use warnings; +package CPAN::Meta::Feature; +BEGIN { + $CPAN::Meta::Feature::VERSION = '2.110440'; +} +# ABSTRACT: an optional feature provided by a CPAN distribution + +use CPAN::Meta::Prereqs; + + +sub new { + my ($class, $identifier, $spec) = @_; + + my %guts = ( + identifier => $identifier, + description => $spec->{description}, + prereqs => CPAN::Meta::Prereqs->new($spec->{prereqs}), + ); + + bless \%guts => $class; +} + + +sub identifier { $_[0]{identifier} } + + +sub description { $_[0]{description} } + + +sub prereqs { $_[0]{prereqs} } + +1; + + + +=pod + +=head1 NAME + +CPAN::Meta::Feature - an optional feature provided by a CPAN distribution + +=head1 VERSION + +version 2.110440 + +=head1 DESCRIPTION + +A CPAN::Meta::Feature object describes an optional feature offered by a CPAN +distribution and specified in the distribution's F<META.json> (or F<META.yml>) +file. + +For the most part, this class will only be used when operating on the result of +the C<feature> or C<features> methods on a L<CPAN::Meta> object. + +=head1 METHODS + +=head2 new + + my $feature = CPAN::Meta::Feature->new( $identifier => \%spec ); + +This returns a new Feature object. The C<%spec> argument to the constructor +should be the same as the value of the C<optional_feature> entry in the +distmeta. It must contain entries for C<description> and C<prereqs>. + +=head2 identifier + +This method returns the feature's identifier. + +=head2 description + +This method returns the feature's long description. + +=head2 prereqs + +This method returns the feature's prerequisites as a L<CPAN::Meta::Prereqs> +object. + +=head1 BUGS + +Please report any bugs or feature using the CPAN Request Tracker. +Bugs can be submitted through the web interface at +L<http://rt.cpan.org/Dist/Display.html?Queue=CPAN-Meta> + +When submitting a bug or request, please include a test-file or a patch to an +existing test-file that illustrates the bug or desired feature. + +=head1 AUTHORS + +=over 4 + +=item * + +David Golden <dagolden@cpan.org> + +=item * + +Ricardo Signes <rjbs@cpan.org> + +=back + +=head1 COPYRIGHT AND LICENSE + +This software is copyright (c) 2010 by David Golden and Ricardo Signes. + +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 + + +__END__ + + + |