Avoid uninitialized values if klist isn't installed.release/0.7debian/0.7-1

1 files changed, 2 insertions, 2 deletions

diff --git a/perl/t/verifier-netdb.t b/perl/t/verifier-netdb.t
index 0dafbdc..6a77e3c 100755
--- a/perl/t/verifier-netdb.t
+++ b/perl/t/verifier-netdb.t
@@ -24,10 +24,10 @@ my $host  = 'windlord.stanford.edu';
 my $user  = 'rra@stanford.edu';
 
 # Determine the local principal.
-my $klist = `klist 2>&1`;
+my $klist = `klist 2>&1` || '';
 SKIP: {
     skip "tests useful only with Stanford Kerberos tickets", 4
-        unless $klist =~ /^Default principal: \S+\@stanford\.edu$/m;
+        unless ($klist =~ /^Default principal: \S+\@stanford\.edu$/m);
 
     # Set up our configuration.
     $Wallet::Config::NETDB_REALM = 'stanford.edu';