missing semicolon, remove ^Ms

git-svn-id: http://dev.catalyst.perl.org/repos/bast/local-lib/1.000/trunk@6547 bd8105ee-0ff8-0310-8827-fb3f25b6796d

diff --git a/eg/scripted_install.pl b/eg/scripted_install.pl
index 91bb13f..58f51a4 100644 (file)
--- a/eg/scripted_install.pl
+++ b/eg/scripted_install.pl
@@ -1,19 +1,19 @@
-#!/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
+#!/usr/bin/perl
+# contributed by hdp@cpan.org
+
+use strict;
+use warnings;
+use CPAN;
+use Cwd;
+use File::Spec;
 my $target = $ENV{TARGET} ? Cwd::abs_path($ENV{TARGET}) : undef;
-\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
-my $bootstrap = $target ? "--bootstrap=$target" : "--bootstrap"
+
+my $mod = CPAN::Shell->expand(Module => "local::lib");
+$mod->get;
+my $dir = CPAN::Shell->expand(Distribution => $mod->cpan_file)->dir;
+chdir($dir);
+my $make = $CPAN::Config->{make};
+my $bootstrap = $target ? "--bootstrap=$target" : "--bootstrap";
 system($^X, 'Makefile.PL', $bootstrap) && exit 1;
-system($make, 'test') && exit 1;\r
-system($make, 'install') && exit 1;\r
+system($make, 'test') && exit 1;
+system($make, 'install') && exit 1;