package Syntax::Keyword::Gather;
use Sub::Exporter::Progressive -setup => {
exports => [qw( break gather gathered take )],
groups => {
default => [qw( break gather gathered take )],
},
};
# elsewhere
# uses Exporter for speed
use Syntax::Keyword::Gather;
# somewhere else
# uses Sub::Exporter for features
use Syntax::Keyword::Gather 'gather', take => { -as => 'grab' };
Note that this module will export @EXPORT, @EXPORT_OK and %EXPORT_TAGS package variables for "Exporter" to work. Additionally, if your package uses advanced "Sub::Exporter" features like currying, this module will only ever use "Sub::Exporter", so you might as well use it directly.
mst - Matt S. Trout (cpan:MSTROUT) <mst@shadowcat.co.uk>
leont - Leon Timmermans (cpan:LEONT) <leont@cpan.org>
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.