use strict; use warnings; use Module::Build; use Module::Build; my $class = Module::Build->subclass( class => "Module::Build::Custom", code => <<'SUBCLASS' ); sub ACTION_upload { my $self = shift; my $v = $self->dist_version(); $self->do_system(('cpan-upload', "Graphics-DZI-$v.tar.gz")); } SUBCLASS my $builder = Module::Build::Custom->new( module_name => 'Graphics::DZI', license => 'perl', # version => $version, dist_author => 'Robert Barta ', dist_version_from => 'lib/Graphics/DZI.pm', build_requires => { 'Moose' => '', 'Image::Magick' => '', 'File::Path' => '', 'File::Slurp' => '', 'File::Basename' => '', 'Getopt::Long' => '', 'Pod::Usage' => '', 'Log::Log4perl' => '', 'Image::Magick' => '', 'List::MoreUtils' => '', 'Test::More' => '', 'Test::Exception' => '', 'Test::Pod::Coverage' => '', }, script_files => [ 'script/deepzoom' ], add_to_cleanup => [ 'Graphics-DZI-*' ], create_makefile_pl => 'traditional', ); $builder->create_build_script(); __END__