Ampliando Module::Build

Directorio de instalación de la distribución

La acción distdir lee el manifiesto del paquete y copia todos los archivos a un directorio nuevo formado con el nombre de la distribución y la versión. Para averigüar automáticamente qué nombre es ese podemos ampliar nuestro programa de construcción con un método de nuestra elección:

use Module::Build;


my $class = Module::Build->subclass( code => <<'SUBCLASS' );

sub ACTION_showdistdir {
    my $self = shift;

    print $self->dist_dir(),"\n";
}
SUBCLASS

my $build = $class->new( ... );

$build->createbuildscript();

Es decir, utilizamos un método de clase de --modulebuild-- llamado subclass para añadir un acción llamada showdistdir a una nueva clase, heredera de --modulebuild--, y que servirá para construir el paquete igual que su clase base.

Para usarlo emplearemos la secuencia habitual sólo que después podemos llamar a la nueva acción que nos mostrará justo la información que necesitamos para usarla en nuestro archivo make:

$ perl Build.PL
Deleting _build
Creating custom builder _build/lib/MyModuleBuilder.pm in _build/lib
Checking whether your kit is complete...
Looks good
Deleting Build
Removed previous script 'Build'
Creating new 'Build' script for 'Taquiones-Admin' version '0.9'
$ perl Build showdistdir
Taquiones-Admin-0.9
$