MyCPAN::App::DPAN - Create a CPAN-like structure out of some dists
use MyCPAN::App::DPAN; my $application = MyCPAN::App::DPAN->activate( @ARGV ); # do some other stuff, anything that you like $application->activate_end;
This module ties together all the bits to let the
dpan do its work. It overrides the defaults in
MyCPAN::App::BackPAN::Indexer to provide the right components.
The work happens in two steps. When you call
activate, the program goes through all of the steps to examin each of the module distributions. It creates a report for each distribution, then stops. This pause right after the examination gives you the chance to do something right before the program creates the PAUSE index files. The examination might take several minutes (or even hours depending on how much you want to index), so you have a chance to check the state of the world before the next step.
When you call
activate_end, the program takes the results from the previous step and creates the PAUSE index files in the modules directory. This step should be very quick since all of the information is ready-to-go.
Returns the list of default configuration directive.
Returns the configuration value for DIRECTIVE.
Adjusts the configuration to set various internal values. You don't need to call this yourself.
Returns the list of methods to invoke from
activate. By overriding this method you can change the DPAN process.
Runs right before
dpan is about to exit. It calls the postflight handler if one if configured. It prints a short summary message to standard output.
Returns the list of components to load and the implementing classes.
fresh_start is set, this method deletes the reports in the report directory, leaving the directories in place.
This code is in Github:
brian d foy,
Copyright (c) 2008-2010, brian d foy, All Rights Reserved.
You may redistribute this under the same terms as Perl itself.