1 files changed, 2 insertions, 1 deletions
diff --git a/util/amdtools/k8-compare-pci-space.pl b/util/amdtools/k8-compare-pci-space.pl
index 77fdb59dd4..505d5b47c8 100755
--- a/util/amdtools/k8-compare-pci-space.pl
+++ b/util/amdtools/k8-compare-pci-space.pl
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 use Getopt::Long;
 
 use strict;
+use warnings;
 
 my $NAME = $0;
 my $VERSION = '0.01';