view release on metacpan or  search on metacpan

doc/makedist.conf  view on Meta::CPAN

# vim:ft=perl:et:
#### $XDG_CONFIG_HOME/makedist/makedist.conf
###  $HOME/.makedist.conf
##
##   https://github.com/trapd00r/makedist
##   https://metacpan.org/release/App-makedist


use File::Copy qw(cp);

my $cpan_dist_dir = "$ENV{HOME}/";
my $pause_id      = '';
my $remote_host   = '';

#our $command_on_success = sub { scp(); };
our $command_on_success = sub { copy(); };


#our $command_on_succes = sub {
#  copy();   # copy the distribution tarball somewhere
#  scp();    # scp the distribution tarball somewhere
#  upload(); # upload the distribution to cpan
#}

sub scp { system('scp', $finished_product, $remote_host); }
sub copy {
  cp($finished_product, $cpan_dist_dir) or die "Copy failed: $!";
}

sub upload {
  system('cpan-upload', '-u', $pause_id, $finished_product);
}