NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

autarch
(email not shown publicly)
http://www.vegguide.org/

Wednesday July 18, 2001

11:56 AM

[ #448 ]

This is even better

sub dist_core
{
my $self = shift;

my $dist_core = $self->SUPER::dist_core(@_);

$dist_core =~ s/dist : (\$$DIST_DEFAULT$)/dist : distcheck pause $1/;

$dist_core .= qq|\n\npause : \n\t\@\$$PERL$ -e'print "Press a key\\n"; <STDIN>'|;

return $dist_core;
}

Now it does the distcheck, pauses, and then makes the tarball.