view release on metacpan or  search on metacpan

b/ModuleBuildZoid.pm  view on Meta::CPAN

sub process_MyPre_files {
	my $self = shift;

	my $blib = $self->blib;
	my $testPL = File::Spec->catfile('b','test.PL');

	$self->run_perl_script($testPL);

	$self->copy_if_modified( from => $_, to => File::Spec->catfile($blib, 'doc', $_) )
		for qw/Changes README/;

}

sub process_MyPost_files {
	my $self = shift;
	$self->run_perl_script( File::Spec->catfile('b', 'Strip.PL') )
		if $self->{args}{strip};
}