diff options
Diffstat (limited to 'contrib/wallet-report')
| -rwxr-xr-x | contrib/wallet-report | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/contrib/wallet-report b/contrib/wallet-report index 6f09914..1abe1f8 100755 --- a/contrib/wallet-report +++ b/contrib/wallet-report @@ -1,5 +1,4 @@ #!/usr/bin/perl -w -$ID = q$Id$; # # wallet-report -- Report on keytabs in the wallet database. # @@ -41,7 +40,7 @@ $ADDRESS = 'nobody@example.com'; require 5.005; use strict; -use vars qw($ADDRESS $DUMPFILE $ID @PATTERNS $REPORTS); +use vars qw($ADDRESS $DUMPFILE @PATTERNS $REPORTS); use Getopt::Long qw(GetOptions); use File::Path qw(mkpath); |