From ff1cfeda29233acb3b4c7eebc934c64b95499eb7 Mon Sep 17 00:00:00 2001
From: "Michael G. Schwern" <schwern@pobox.com>
Date: Tue, 7 Jul 2009 15:31:01 -0700
Subject: [PATCH] We don't have to add our own null pointer, there's already
 one on argv.

---
 bin/perl5i.c.PL | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/bin/perl5i.c.PL b/bin/perl5i.c.PL
index 782240b..b44db72 100644
--- a/bin/perl5i.c.PL
+++ b/bin/perl5i.c.PL
@@ -30,15 +30,10 @@ int main (int argc, char* argv[]) {
     perl_args[0] = argv[0];
     perl_args[1] = "-Mperl5i";
 
-    for( i = 1;  i < argc;  i++ ) {
+    for( i = 1;  i <= argc;  i++ ) {
         perl_args[i+1] = argv[i];
     }
 
-    /* Argument array to execv must
-     * terminated by a null pointer
-     */
-    perl_args[argc+1] = (char *)NULL;
-
     return execv( perl_cmd, perl_args );
 }
 END