diff --git a/tools/cleanfile b/tools/cleanfile
index cefd29e52..c00c69b91 100755
--- a/tools/cleanfile
+++ b/tools/cleanfile
@@ -1,9 +1,11 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
+# SPDX-License-Identifier: GPL-2.0
 #
 # Clean a text file -- or directory of text files -- of stealth whitespace.
 # WARNING: this can be a highly destructive operation.  Use with caution.
 #
 
+use warnings;
 use bytes;
 use File::Basename;
 
diff --git a/tools/cleanpatch b/tools/cleanpatch
index 9680d03ad..9f1755271 100755
--- a/tools/cleanpatch
+++ b/tools/cleanpatch
@@ -1,9 +1,11 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
+# SPDX-License-Identifier: GPL-2.0
 #
 # Clean a patch file -- or directory of patch files -- of stealth whitespace.
 # WARNING: this can be a highly destructive operation.  Use with caution.
 #
 
+use warnings;
 use bytes;
 use File::Basename;