Merge pull request #33 from orkunkaraduman/dev

v2.04
orkunkaraduman · Mar 8, 2017 · 01a9a8d · 01a9a8d
2 parents a5b384d + aacddcf
commit 01a9a8d
Show file tree

Hide file tree

Showing 9 changed files with 53 additions and 20 deletions.
diff --git a/Changes b/Changes
@@ -1,3 +1,7 @@
+2.04	2017-03-08
+		- Script files bug fix for #! /usr/bin/perl
+		- POD changes
+
 2.03	2017-03-06
 		- Perl v5.10.1 compatibility
 

diff --git a/README b/README
@@ -2,7 +2,7 @@ NAME
     App::Virtualenv - Perl virtual environment
 
 VERSION
-    version 2.03
+    version 2.04
 
 ABSTRACT
     Perl virtual environment

diff --git a/README.md b/README.md
@@ -4,7 +4,7 @@ App::Virtualenv - Perl virtual environment
 
 # VERSION
 
-version 2.03
+version 2.04
 
 # ABSTRACT
 

diff --git a/dev/dist.pl b/dev/dist.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/perl
+#!/usr/bin/env perl
 =head1 NAME
 
 dist.pl - distribution generator

diff --git a/dev/test.pl b/dev/test.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/perl
+#!/usr/bin/env perl
 =head1 NAME
 
 test.pl - for internal tests

diff --git a/lib/App/Virtualenv.pm b/lib/App/Virtualenv.pm
@@ -5,7 +5,7 @@ App::Virtualenv - Perl virtual environment
 
 =head1 VERSION
 
-version 2.03
+version 2.04
 
 =head1 ABSTRACT
 
@@ -37,7 +37,7 @@ use Lazy::Utils;
 BEGIN
 {
 	require Exporter;
-	our $VERSION     = '2.03';
+	our $VERSION     = '2.04';
 	our @ISA         = qw(Exporter);
 	our @EXPORT      = qw(main run);
 	our @EXPORT_OK   = qw();
@@ -188,11 +188,12 @@ sub create
 
 	my $pkgPath = dirname(__FILE__);
 	_system("cp -v $pkgPath/Virtualenv/activate $virtualenvPath/bin/activate && chmod 644 $virtualenvPath/bin/activate");
-	_system("cp -v $pkgPath/Virtualenv/sh.pl $virtualenvPath/bin/sh.pl && chmod 755 $virtualenvPath/bin/sh.pl");
-	_system("cp -v $pkgPath/Virtualenv/perl.pl $virtualenvPath/bin/perl.pl && chmod 755 $virtualenvPath/bin/perl.pl");
-	_system("ln -v -s -f perl.pl $virtualenvPath/bin/perl");
 	_system("cp -v $pkgPath/Virtualenv/virtualenv.pl $virtualenvPath/bin/virtualenv.pl && chmod 755 $virtualenvPath/bin/virtualenv.pl");
 	_system("ln -v -s -f virtualenv.pl $virtualenvPath/bin/virtualenv");
+	_system("cp -v $pkgPath/Virtualenv/sh.pl $virtualenvPath/bin/sh.pl && chmod 755 $virtualenvPath/bin/sh.pl");
+	_system("echo \"#!".shellmeta($Config{perlpath})."\" > $virtualenvPath/bin/perl.pl");
+	_system("cat $pkgPath/Virtualenv/perl.pl >> $virtualenvPath/bin/perl.pl && chmod 755 $virtualenvPath/bin/perl.pl");
+	_system("ln -v -s -f perl.pl $virtualenvPath/bin/perl");
 
 	return $virtualenvPath;
 }

diff --git a/lib/App/Virtualenv/perl.pl b/lib/App/Virtualenv/perl.pl
@@ -1,18 +1,22 @@
-#! /usr/bin/perl
+#!/usr/bin/env perl
 =head1 NAME
 
 perl.pl - runs Perl language interpreter in Perl virtual environment
 
 =head1 VERSION
 
-version 2.03
+version 2.04
 
 =head1 ABSTRACT
 
 runs Perl language interpreter in Perl virtual environment
 
+=over
+
 [I<environment_path>/bin/]B<perl.pl> [I<argument>]...
 
+=back
+
 =cut
 use strict;
 use warnings;
@@ -23,7 +27,7 @@ =head1 ABSTRACT
 
 BEGIN
 {
-	our $VERSION     = '2.03';
+	our $VERSION     = '2.04';
 }
 
 

diff --git a/lib/App/Virtualenv/sh.pl b/lib/App/Virtualenv/sh.pl
@@ -1,18 +1,22 @@
-#! /usr/bin/perl
+#!/usr/bin/env perl
 =head1 NAME
 
 sh.pl - runs Unix shell in Perl virtual environment
 
 =head1 VERSION
 
-version 2.03
+version 2.04
 
 =head1 ABSTRACT
 
 runs Unix shell in Perl virtual environment
 
+=over
+
 [I<environment_path>/bin/]B<sh.pl> [I<argument>]...
 
+=back
+
 =cut
 use strict;
 use warnings;
@@ -23,7 +27,7 @@ =head1 ABSTRACT
 
 BEGIN
 {
-	our $VERSION     = '2.03';
+	our $VERSION     = '2.04';
 }
 
 

diff --git a/lib/App/Virtualenv/virtualenv.pl b/lib/App/Virtualenv/virtualenv.pl
@@ -1,11 +1,11 @@
-#! /usr/bin/perl
+#!/usr/bin/env perl
 =head1 NAME
 
 virtualenv.pl - manages Perl virtual environment
 
 =head1 VERSION
 
-version 2.03
+version 2.04
 
 =head1 ABSTRACT
 
@@ -27,7 +27,7 @@ =head1 ABSTRACT
 
 =head2 activate
 
-activates Perl virtual environment
+activates Perl virtual environment (Bash only)
 
 =over
 
@@ -37,14 +37,34 @@ =head2 activate
 
 =head2 deactivate
 
-deactivates activated Perl virtual environment
+deactivates activated Perl virtual environment (Bash only)
 
 =over
 
 B<deactivate>
 
 =back
 
+=head2 sh.pl
+
+runs Unix shell in Perl virtual environment
+
+=over
+
+[I<environment_path>/bin/]B<sh.pl> [I<argument>]...
+
+=back
+
+=head2 perl.pl
+
+runs Perl language interpreter in Perl virtual environment
+
+=over
+
+[I<environment_path>/bin/]B<perl.pl> [I<argument>]...
+
+=back
+
 =cut
 use strict;
 use warnings;
@@ -55,7 +75,7 @@ =head2 deactivate
 
 BEGIN
 {
-	our $VERSION     = '2.03';
+	our $VERSION     = '2.04';
 }