#! /usr/bin/perl
use Module::Build;
my $class = Module::Build->subclass
(
class => 'CR::Builder',
code => q{
use File::Find;
sub __clean {
my $self = shift;
find(sub
{
if (/~$/)
{
$self->delete_filetree($_)
}
},
'.');
}
sub ACTION_clean {
my $self = shift;
$self->__clean(); $self->SUPER::ACTION_clean(@_);
}
sub ACTION_realclean {
my $self = shift;
$self->__clean(); $self->SUPER::ACTION_realclean(@_);
}
});;
#my $build = Module::Build->new
my $build = $class->new
(
module_name => 'Cache::Repository',
license => 'perl',
requires => {
perl => '5.8.0',
'Filesys::DiskUsage' => '0.04',
},
recommends => {
'Filesys::Statvfs' => 0,
},
);
$build->create_build_script();