Fair enough.
Here is a [longer] patch to remove all of the she-bang lines, then.
- James
Brent Royal-Gordon via RT wrote:
James deBoer <[EMAIL PROTECTED]> wrote:
There are a number of .pl files within parrot/config.
Some of them have a she-bang line at the beginning of the script, others do not.
This patch simply adds '#! perl -w' to the top of any script that didn't
have this line already.
These scripts can only be run by Configure "do"ing them. I don't think it really makes sense for them to have shebang lines.
Index: config/auto/byteorder.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/byteorder.pl,v retrieving revision 1.2 diff -u -r1.2 byteorder.pl --- config/auto/byteorder.pl 26 Feb 2004 00:43:02 -0000 1.2 +++ config/auto/byteorder.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: byteorder.pl,v 1.2 2004/02/26 00:43:02 mikescott Exp $ @@ -46,4 +45,4 @@ } } -1; \ No newline at end of file +1; Index: config/auto/cgoto.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/cgoto.pl,v retrieving revision 1.17 diff -u -r1.17 cgoto.pl --- config/auto/cgoto.pl 25 Mar 2004 16:52:53 -0000 1.17 +++ config/auto/cgoto.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: cgoto.pl,v 1.17 2004/03/25 16:52:53 dan Exp $ Index: config/auto/env.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/env.pl,v retrieving revision 1.4 diff -u -r1.4 env.pl --- config/auto/env.pl 6 Mar 2004 22:24:30 -0000 1.4 +++ config/auto/env.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: env.pl,v 1.4 2004/03/06 22:24:30 brentdax Exp $ Index: config/auto/format.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/format.pl,v retrieving revision 1.3 diff -u -r1.3 format.pl --- config/auto/format.pl 26 Feb 2004 00:43:02 -0000 1.3 +++ config/auto/format.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: format.pl,v 1.3 2004/02/26 00:43:02 mikescott Exp $ Index: config/auto/funcptr.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/funcptr.pl,v retrieving revision 1.4 diff -u -r1.4 funcptr.pl --- config/auto/funcptr.pl 6 Mar 2004 22:24:30 -0000 1.4 +++ config/auto/funcptr.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: funcptr.pl,v 1.4 2004/03/06 22:24:30 brentdax Exp $ Index: config/auto/gc.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/gc.pl,v retrieving revision 1.8 diff -u -r1.8 gc.pl --- config/auto/gc.pl 7 Mar 2004 05:45:00 -0000 1.8 +++ config/auto/gc.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: gc.pl,v 1.8 2004/03/07 05:45:00 brentdax Exp $ Index: config/auto/gcc.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/gcc.pl,v retrieving revision 1.19 diff -u -r1.19 gcc.pl --- config/auto/gcc.pl 5 May 2004 07:27:47 -0000 1.19 +++ config/auto/gcc.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: gcc.pl,v 1.19 2004/05/05 07:27:47 leo Exp $ Index: config/auto/headers.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/headers.pl,v retrieving revision 1.18 diff -u -r1.18 headers.pl --- config/auto/headers.pl 8 Oct 2004 22:01:06 -0000 1.18 +++ config/auto/headers.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: headers.pl,v 1.18 2004/10/08 22:01:06 jrieks Exp $ Index: config/auto/snprintf.pl =================================================================== RCS file: /cvs/public/parrot/config/auto/snprintf.pl,v retrieving revision 1.1 diff -u -r1.1 snprintf.pl --- config/auto/snprintf.pl 28 Sep 2004 08:51:45 -0000 1.1 +++ config/auto/snprintf.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: snprintf.pl,v 1.1 2004/09/28 08:51:45 leo Exp $ Index: config/gen/config_h.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/config_h.pl,v retrieving revision 1.13 diff -u -r1.13 config_h.pl --- config/gen/config_h.pl 31 May 2004 11:54:52 -0000 1.13 +++ config/gen/config_h.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: config_h.pl,v 1.13 2004/05/31 11:54:52 leo Exp $ Index: config/gen/config_pm.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/config_pm.pl,v retrieving revision 1.9 diff -u -r1.9 config_pm.pl --- config/gen/config_pm.pl 1 Aug 2004 09:33:42 -0000 1.9 +++ config/gen/config_pm.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: config_pm.pl,v 1.9 2004/08/01 09:33:42 leo Exp $ Index: config/gen/core_pmcs.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/core_pmcs.pl,v retrieving revision 1.17 diff -u -r1.17 core_pmcs.pl --- config/gen/core_pmcs.pl 27 Jun 2004 15:29:44 -0000 1.17 +++ config/gen/core_pmcs.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: core_pmcs.pl,v 1.17 2004/06/27 15:29:44 leo Exp $ Index: config/gen/cpu.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/cpu.pl,v retrieving revision 1.2 diff -u -r1.2 cpu.pl --- config/gen/cpu.pl 25 Apr 2004 15:21:53 -0000 1.2 +++ config/gen/cpu.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2004 The Perl Foundation. All Rights Reserved. # $Id: cpu.pl,v 1.2 2004/04/25 15:21:53 leo Exp $ Index: config/gen/icu.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/icu.pl,v retrieving revision 1.24 diff -u -r1.24 icu.pl --- config/gen/icu.pl 10 Oct 2004 20:52:07 -0000 1.24 +++ config/gen/icu.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: icu.pl,v 1.24 2004/10/10 20:52:07 jrieks Exp $ Index: config/gen/makefiles.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/makefiles.pl,v retrieving revision 1.36 diff -u -r1.36 makefiles.pl --- config/gen/makefiles.pl 13 Sep 2004 05:25:51 -0000 1.36 +++ config/gen/makefiles.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: makefiles.pl,v 1.36 2004/09/13 05:25:51 sfink Exp $ Index: config/gen/parrot_include.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/parrot_include.pl,v retrieving revision 1.14 diff -u -r1.14 parrot_include.pl --- config/gen/parrot_include.pl 28 May 2004 09:40:50 -0000 1.14 +++ config/gen/parrot_include.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: parrot_include.pl,v 1.14 2004/05/28 09:40:50 leo Exp $ Index: config/gen/platform.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/platform.pl,v retrieving revision 1.19 diff -u -r1.19 platform.pl --- config/gen/platform.pl 8 Oct 2004 09:45:01 -0000 1.19 +++ config/gen/platform.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: platform.pl,v 1.19 2004/10/08 09:45:01 jrieks Exp $ Index: config/gen/cpu/i386/auto.pl =================================================================== RCS file: /cvs/public/parrot/config/gen/cpu/i386/auto.pl,v retrieving revision 1.4 diff -u -r1.4 auto.pl --- config/gen/cpu/i386/auto.pl 5 May 2004 07:27:43 -0000 1.4 +++ config/gen/cpu/i386/auto.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2004 The Perl Foundation. All Rights Reserved. # $Id: auto.pl,v 1.4 2004/05/05 07:27:43 leo Exp $ Index: config/init/data.pl =================================================================== RCS file: /cvs/public/parrot/config/init/data.pl,v retrieving revision 1.35 diff -u -r1.35 data.pl --- config/init/data.pl 8 Oct 2004 07:08:32 -0000 1.35 +++ config/init/data.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: data.pl,v 1.35 2004/10/08 07:08:32 sfink Exp $ Index: config/init/headers.pl =================================================================== RCS file: /cvs/public/parrot/config/init/headers.pl,v retrieving revision 1.7 diff -u -r1.7 headers.pl --- config/init/headers.pl 7 Mar 2004 05:45:23 -0000 1.7 +++ config/init/headers.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: headers.pl,v 1.7 2004/03/07 05:45:23 brentdax Exp $ Index: config/init/hints.pl =================================================================== RCS file: /cvs/public/parrot/config/init/hints.pl,v retrieving revision 1.9 diff -u -r1.9 hints.pl --- config/init/hints.pl 27 Mar 2004 01:33:07 -0000 1.9 +++ config/init/hints.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: hints.pl,v 1.9 2004/03/27 01:33:07 brentdax Exp $ Index: config/init/manifest.pl =================================================================== RCS file: /cvs/public/parrot/config/init/manifest.pl,v retrieving revision 1.5 diff -u -r1.5 manifest.pl --- config/init/manifest.pl 26 Feb 2004 00:43:07 -0000 1.5 +++ config/init/manifest.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: manifest.pl,v 1.5 2004/02/26 00:43:07 mikescott Exp $ Index: config/init/miniparrot.pl =================================================================== RCS file: /cvs/public/parrot/config/init/miniparrot.pl,v retrieving revision 1.5 diff -u -r1.5 miniparrot.pl --- config/init/miniparrot.pl 8 Mar 2004 08:49:15 -0000 1.5 +++ config/init/miniparrot.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: miniparrot.pl,v 1.5 2004/03/08 08:49:15 brentdax Exp $ Index: config/init/optimize.pl =================================================================== RCS file: /cvs/public/parrot/config/init/optimize.pl,v retrieving revision 1.4 diff -u -r1.4 optimize.pl --- config/init/optimize.pl 25 Mar 2004 15:42:41 -0000 1.4 +++ config/init/optimize.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: optimize.pl,v 1.4 2004/03/25 15:42:41 leo Exp $ Index: config/inter/exp.pl =================================================================== RCS file: /cvs/public/parrot/config/inter/exp.pl,v retrieving revision 1.2 diff -u -r1.2 exp.pl --- config/inter/exp.pl 26 Feb 2004 00:43:11 -0000 1.2 +++ config/inter/exp.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: exp.pl,v 1.2 2004/02/26 00:43:11 mikescott Exp $ @@ -39,4 +38,4 @@ Configure::Data->set(expnetworking => $net); } -1; \ No newline at end of file +1; Index: config/inter/ops.pl =================================================================== RCS file: /cvs/public/parrot/config/inter/ops.pl,v retrieving revision 1.5 diff -u -r1.5 ops.pl --- config/inter/ops.pl 26 Feb 2004 00:43:11 -0000 1.5 +++ config/inter/ops.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: ops.pl,v 1.5 2004/02/26 00:43:11 mikescott Exp $ Index: config/inter/pmc.pl =================================================================== RCS file: /cvs/public/parrot/config/inter/pmc.pl,v retrieving revision 1.18 diff -u -r1.18 pmc.pl --- config/inter/pmc.pl 1 Nov 2004 12:28:47 -0000 1.18 +++ config/inter/pmc.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: pmc.pl,v 1.18 2004/11/01 12:28:47 leo Exp $ Index: config/inter/progs.pl =================================================================== RCS file: /cvs/public/parrot/config/inter/progs.pl,v retrieving revision 1.19 diff -u -r1.19 progs.pl --- config/inter/progs.pl 8 Oct 2004 09:45:03 -0000 1.19 +++ config/inter/progs.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: progs.pl,v 1.19 2004/10/08 09:45:03 jrieks Exp $ Index: config/inter/types.pl =================================================================== RCS file: /cvs/public/parrot/config/inter/types.pl,v retrieving revision 1.3 diff -u -r1.3 types.pl --- config/inter/types.pl 16 Jul 2004 09:08:59 -0000 1.3 +++ config/inter/types.pl 2 Nov 2004 02:45:42 -0000 @@ -1,4 +1,3 @@ -#! perl -w # Copyright: 2001-2003 The Perl Foundation. All Rights Reserved. # $Id: types.pl,v 1.3 2004/07/16 09:08:59 brentdax Exp $
