[p5sagit/local-lib.git] / eg / scripted_install.pl

#!/usr/bin/perl\r
# contributed by hdp@cpan.org\r
\r
use strict;\r
use warnings;\r
use CPAN;\r
use Cwd;\r
use File::Spec;\r
my $target = Cwd::abs_path($ENV{TARGET})\r
  or die "set \$ENV{TARGET} to your desired local::lib dir\n";\r
\r
my $mod = CPAN::Shell->expand(Module => "local::lib");\r
$mod->get;\r
my $dir = CPAN::Shell->expand(Distribution => $mod->cpan_file)->dir;\r
chdir($dir);\r
my $make = $CPAN::Config->{make};\r
system($^X, 'Makefile.PL',"--bootstrap=$target") && exit 1;\r
system($make, 'test') && exit 1;\r
system($make, 'install') && exit 1;\r
Commit	Line	Data
9a021b2b	1	#!/usr/bin/perl\r
	2	# contributed by hdp@cpan.org\r
	3	\r
	4	use strict;\r
	5	use warnings;\r
	6	use CPAN;\r
	7	use Cwd;\r
	8	use File::Spec;\r
	9	my $target = Cwd::abs_path($ENV{TARGET})\r
	10	or die "set \$ENV{TARGET} to your desired local::lib dir\n";\r
	11	\r
	12	my $mod = CPAN::Shell->expand(Module => "local::lib");\r
	13	$mod->get;\r
	14	my $dir = CPAN::Shell->expand(Distribution => $mod->cpan_file)->dir;\r
	15	chdir($dir);\r
	16	my $make = $CPAN::Config->{make};\r
	17	system($^X, 'Makefile.PL',"--bootstrap=$target") && exit 1;\r
	18	system($make, 'test') && exit 1;\r
	19	system($make, 'install') && exit 1;\r