From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:36746) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d3qyn-000085-SF for qemu-devel@nongnu.org; Thu, 27 Apr 2017 17:29:39 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1d3qym-0000wK-PE for qemu-devel@nongnu.org; Thu, 27 Apr 2017 17:29:37 -0400 Sender: =?UTF-8?Q?Philippe_Mathieu=2DDaud=C3=A9?= References: <20170426115826.1826-1-n54@gmx.com> <20170426131604.3459-1-n54@gmx.com> From: =?UTF-8?Q?Philippe_Mathieu-Daud=c3=a9?= Message-ID: Date: Thu, 27 Apr 2017 18:29:27 -0300 MIME-Version: 1.0 In-Reply-To: <20170426131604.3459-1-n54@gmx.com> Content-Type: text/plain; charset=windows-1252; format=flowed Content-Transfer-Encoding: 8bit Subject: Re: [Qemu-devel] [PATCH v2] scripts: Switch to more portable Perl shebang List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , To: Kamil Rytarowski , qemu-devel@nongnu.org Cc: qemu-trivial@nongnu.org, peter.maydell@linaro.org, armbru@redhat.com On 04/26/2017 10:16 AM, Kamil Rytarowski wrote: > The default NetBSD package manager is pkgsrc and it installs Perl > along other third party programs under custom and configurable prefix. > The default prefix for binary prebuilt packages is /usr/pkg, and the > Perl executable lands in /usr/pkg/bin/perl. > > This change switches "/usr/bin/perl" to "/usr/bin/env perl" as it's > the most portable solution that should work for almost everybody. > Perl's executable is detected automatically. > > This change switches -w option passed to the executable with more > modern "use warnings;" approach. There is no functional change to the > default behavior. > > Signed-off-by: Kamil Rytarowski Reviewed-by: Philippe Mathieu-Daudé > --- > scripts/checkpatch.pl | 3 ++- > scripts/clean-header-guards.pl | 3 ++- > scripts/cleanup-trace-events.pl | 2 +- > scripts/disas-objdump.pl | 4 +++- > scripts/get_maintainer.pl | 3 ++- > scripts/shaderinclude.pl | 2 +- > scripts/switch-timer-api | 2 +- > scripts/texi2pod.pl | 4 +++- > 8 files changed, 15 insertions(+), 8 deletions(-) > > diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl > index f084542934..3bb6fc95bd 100755 > --- a/scripts/checkpatch.pl > +++ b/scripts/checkpatch.pl > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl -w > +#!/usr/bin/env perl > # (c) 2001, Dave Jones. (the file handling bit) > # (c) 2005, Joel Schopp (the ugly bit) > # (c) 2007,2008, Andy Whitcroft (new conditions, test suite) > @@ -6,6 +6,7 @@ > # Licensed under the terms of the GNU GPL License version 2 > > use strict; > +use warnings; > > my $P = $0; > $P =~ s@.*/@@g; > diff --git a/scripts/clean-header-guards.pl b/scripts/clean-header-guards.pl > index 54ab99ae29..5e67f1998c 100755 > --- a/scripts/clean-header-guards.pl > +++ b/scripts/clean-header-guards.pl > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl -w > +#!/usr/bin/env perl > # > # Clean up include guards in headers > # > @@ -28,6 +28,7 @@ > # "cc -E -DGUARD_H -c -P -", and fed the test program on stdin. > > use strict; > +use warnings; > use Getopt::Std; > > # Stuff we don't want to clean because we import it into our tree: > diff --git a/scripts/cleanup-trace-events.pl b/scripts/cleanup-trace-events.pl > index 7e808efb6a..e93abc00da 100755 > --- a/scripts/cleanup-trace-events.pl > +++ b/scripts/cleanup-trace-events.pl > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl > +#!/usr/bin/env perl > # Copyright (C) 2013 Red Hat, Inc. > # > # Authors: > diff --git a/scripts/disas-objdump.pl b/scripts/disas-objdump.pl > index 8f7e8182a1..bec905f04b 100755 > --- a/scripts/disas-objdump.pl > +++ b/scripts/disas-objdump.pl > @@ -1,4 +1,6 @@ > -#!/usr/bin/perl -w > +#!/usr/bin/env perl > + > +use warnings; > > use File::Temp qw/ tempfile /; > use Getopt::Long; > diff --git a/scripts/get_maintainer.pl b/scripts/get_maintainer.pl > index 8261bcb1ad..d7c2311123 100755 > --- a/scripts/get_maintainer.pl > +++ b/scripts/get_maintainer.pl > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl -w > +#!/usr/bin/env perl > # (c) 2007, Joe Perches > # created from checkpatch.pl > # > @@ -11,6 +11,7 @@ > # Licensed under the terms of the GNU GPL License version 2 > > use strict; > +use warnings; > > my $P = $0; > my $V = '0.26'; > diff --git a/scripts/shaderinclude.pl b/scripts/shaderinclude.pl > index 81b5146332..cd3bb40b12 100644 > --- a/scripts/shaderinclude.pl > +++ b/scripts/shaderinclude.pl > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl > +#!/usr/bin/env perl > use strict; > use warnings; > > diff --git a/scripts/switch-timer-api b/scripts/switch-timer-api > index b0e230b9f1..41736d11dd 100755 > --- a/scripts/switch-timer-api > +++ b/scripts/switch-timer-api > @@ -1,4 +1,4 @@ > -#!/usr/bin/perl > +#!/usr/bin/env perl > > use strict; > use warnings; > diff --git a/scripts/texi2pod.pl b/scripts/texi2pod.pl > index 6e8fec41a1..39ce584a32 100755 > --- a/scripts/texi2pod.pl > +++ b/scripts/texi2pod.pl > @@ -1,4 +1,4 @@ > -#! /usr/bin/perl -w > +#! /usr/bin/env perl > > # Copyright (C) 1999, 2000, 2001, 2003 Free Software Foundation, Inc. > > @@ -22,6 +22,8 @@ > # markup to Perl POD format. It's intended to be used to extract > # something suitable for a manpage from a Texinfo document. > > +use warnings; > + > $output = 0; > $skipping = 0; > %sects = (); >