diff options
| -rwxr-xr-x | scripts/checkpatch.pl | 3 | ||||
| -rwxr-xr-x | scripts/cleanfile | 3 | ||||
| -rwxr-xr-x | scripts/cleanpatch | 3 | ||||
| -rwxr-xr-x | scripts/flashing/adsl2mue_flash.pl | 2 |
4 files changed, 7 insertions, 4 deletions
diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl index c4b7437b90..05fd772c91 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 <jschopp@austin.ibm.com> (the ugly bit) # (c) 2007,2008, Andy Whitcroft <apw@uk.ibm.com> (new conditions, test suite) @@ -7,6 +7,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/cleanfile b/scripts/cleanfile index cefd29e522..64507c488f 100755 --- a/scripts/cleanfile +++ b/scripts/cleanfile @@ -1,4 +1,4 @@ -#!/usr/bin/perl -w +#!/usr/bin/env perl # # Clean a text file -- or directory of text files -- of stealth whitespace. # WARNING: this can be a highly destructive operation. Use with caution. @@ -6,6 +6,7 @@ use bytes; use File::Basename; +use warnings; # Default options $max_width = 79; diff --git a/scripts/cleanpatch b/scripts/cleanpatch index 9680d03ad2..ab5ebddded 100755 --- a/scripts/cleanpatch +++ b/scripts/cleanpatch @@ -1,4 +1,4 @@ -#!/usr/bin/perl -w +#!/usr/bin/env perl # # Clean a patch file -- or directory of patch files -- of stealth whitespace. # WARNING: this can be a highly destructive operation. Use with caution. @@ -6,6 +6,7 @@ use bytes; use File::Basename; +use warnings; # Default options $max_width = 79; diff --git a/scripts/flashing/adsl2mue_flash.pl b/scripts/flashing/adsl2mue_flash.pl index c206c471fd..0162eaf35b 100755 --- a/scripts/flashing/adsl2mue_flash.pl +++ b/scripts/flashing/adsl2mue_flash.pl @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/bin/env perl # # Linksys ADSL2MUE Flash utility. # |