1
0
Fork 0

scripts: Switch to more portable Perl shebang

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.

While there, drop "require 5" from scripts/namespace.pl (Perl from 1994?).

Signed-off-by: Kamil Rytarowski <n54@gmx.com>
Signed-off-by: Masahiro Yamada <yamada.masahiro@socionext.com>
zero-colors
Kamil Rytarowski 2017-05-07 23:25:26 +02:00 committed by Masahiro Yamada
parent 2ea659a9ef
commit cb77f0d623
24 changed files with 37 additions and 25 deletions

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# Copyright 2008, Intel Corporation # Copyright 2008, Intel Corporation
# #

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# #
# checkincludes: find/remove files included more than once # checkincludes: find/remove files included more than once
# #

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# (c) 2001, Dave Jones. (the file handling bit) # (c) 2001, Dave Jones. (the file handling bit)
# (c) 2005, Joel Schopp <jschopp@austin.ibm.com> (the ugly bit) # (c) 2005, Joel Schopp <jschopp@austin.ibm.com> (the ugly bit)
# (c) 2007,2008, Andy Whitcroft <apw@uk.ibm.com> (new conditions, test suite) # (c) 2007,2008, Andy Whitcroft <apw@uk.ibm.com> (new conditions, test suite)
@ -6,6 +6,7 @@
# Licensed under the terms of the GNU GPL License version 2 # Licensed under the terms of the GNU GPL License version 2
use strict; use strict;
use warnings;
use POSIX; use POSIX;
use File::Basename; use File::Basename;
use Cwd 'abs_path'; use Cwd 'abs_path';

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# Check the stack usage of functions # Check the stack usage of functions
# #

View File

@ -1,4 +1,4 @@
#! /usr/bin/perl #! /usr/bin/env perl
# #
# checkversion find uses of LINUX_VERSION_CODE or KERNEL_VERSION # checkversion find uses of LINUX_VERSION_CODE or KERNEL_VERSION
# without including <linux/version.h>, or cases of # without including <linux/version.h>, or cases of

View File

@ -1,9 +1,10 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# Clean a text file -- or directory of text files -- of stealth whitespace. # Clean a text file -- or directory of text files -- of stealth whitespace.
# WARNING: this can be a highly destructive operation. Use with caution. # WARNING: this can be a highly destructive operation. Use with caution.
# #
use warnings;
use bytes; use bytes;
use File::Basename; use File::Basename;

View File

@ -1,9 +1,10 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# Clean a patch file -- or directory of patch files -- of stealth whitespace. # Clean a patch file -- or directory of patch files -- of stealth whitespace.
# WARNING: this can be a highly destructive operation. Use with caution. # WARNING: this can be a highly destructive operation. Use with caution.
# #
use warnings;
use bytes; use bytes;
use File::Basename; use File::Basename;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# Copyright 2016 by Frank Rowand # Copyright 2016 by Frank Rowand
# Copyright 2016 by Gaurav Minocha # Copyright 2016 by Gaurav Minocha

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# (C) Copyright IBM Corporation 2006. # (C) Copyright IBM Corporation 2006.
# Released under GPL v2. # Released under GPL v2.
@ -7,6 +7,7 @@
# Usage: export_report.pl -k Module.symvers [-o report_file ] -f *.mod.c # Usage: export_report.pl -k Module.symvers [-o report_file ] -f *.mod.c
# #
use warnings;
use Getopt::Std; use Getopt::Std;
use strict; use strict;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# extract-mod-sig <part> <module-file> # extract-mod-sig <part> <module-file>
# #
@ -12,6 +12,7 @@
# -k: Just the key ID # -k: Just the key ID
# -s: Just the crypto signature or PKCS#7 message # -s: Just the crypto signature or PKCS#7 message
# #
use warnings;
use strict; use strict;
die "Format: $0 -[0adnks] module-file >out\n" die "Format: $0 -[0adnks] module-file >out\n"

View File

@ -1,5 +1,6 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
use warnings;
use strict; use strict;
use Math::BigInt; use Math::BigInt;
use Fcntl "SEEK_SET"; use Fcntl "SEEK_SET";

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# Copyright (c) Mauro Carvalho Chehab <mchehab@infradead.org> # Copyright (c) Mauro Carvalho Chehab <mchehab@infradead.org>
# Released under GPLv2 # Released under GPLv2

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# DVB firmware extractor # DVB firmware extractor
# #
# (c) 2004 Andrew de Quincey # (c) 2004 Andrew de Quincey

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# (c) 2007, Joe Perches <joe@perches.com> # (c) 2007, Joe Perches <joe@perches.com>
# created from checkpatch.pl # created from checkpatch.pl
# #
@ -10,6 +10,7 @@
# #
# Licensed under the terms of the GNU GPL License version 2 # Licensed under the terms of the GNU GPL License version 2
use warnings;
use strict; use strict;
my $P = $0; my $P = $0;

View File

@ -1,4 +1,4 @@
#! /usr/bin/perl #! /usr/bin/env perl
# #
# Detect cycles in the header file dependency graph # Detect cycles in the header file dependency graph
# Vegard Nossum <vegardno@ifi.uio.no> # Vegard Nossum <vegardno@ifi.uio.no>

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# headers_check.pl execute a number of trivial consistency checks # headers_check.pl execute a number of trivial consistency checks
# #
@ -18,6 +18,7 @@
# #
# 3) Check for leaked CONFIG_ symbols # 3) Check for leaked CONFIG_ symbols
use warnings;
use strict; use strict;
use File::Basename; use File::Basename;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# Copyright 2005-2009 - Steven Rostedt # Copyright 2005-2009 - Steven Rostedt
# Licensed under the terms of the GNU GPL License version 2 # Licensed under the terms of the GNU GPL License version 2
@ -42,6 +42,7 @@
# mv config_strip .config # mv config_strip .config
# make oldconfig # make oldconfig
# #
use warnings;
use strict; use strict;
use Getopt::Long; use Getopt::Long;

View File

@ -1,5 +1,6 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
use warnings;
use strict; use strict;
## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ## ## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##

View File

@ -1,5 +1,6 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
use warnings;
use strict; use strict;
## Copyright (C) 2015 Intel Corporation ## ## Copyright (C) 2015 Intel Corporation ##

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
use File::Basename; use File::Basename;
use Math::BigInt; use Math::BigInt;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# #
# namespace.pl. Mon Aug 30 2004 # namespace.pl. Mon Aug 30 2004
# #
@ -62,7 +62,7 @@
# result. # result.
# #
require 5; # at least perl 5 use warnings;
use strict; use strict;
use File::Find; use File::Find;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# #
# Takes a (sorted) output of readprofile and turns it into a list suitable for # Takes a (sorted) output of readprofile and turns it into a list suitable for

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl -w #!/usr/bin/env perl
# (c) 2008, Steven Rostedt <srostedt@redhat.com> # (c) 2008, Steven Rostedt <srostedt@redhat.com>
# Licensed under the terms of the GNU GPL License version 2 # Licensed under the terms of the GNU GPL License version 2
# #
@ -106,6 +106,7 @@
# 9) Move the result back to the original object. # 9) Move the result back to the original object.
# #
use warnings;
use strict; use strict;
my $P = $0; my $P = $0;

View File

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/bin/env perl
# Read two files produced by the stackusage script, and show the # Read two files produced by the stackusage script, and show the
# delta between them. # delta between them.