import-catacomb-crypto: Add use strict and fix a bug revealed

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/import-catacomb-crypto b/import-catacomb-crypto
index 98a09638c6f7c816221078cc6d1bf6dfef14dbce..c71359c83be0fbea817f48494627f316fc522c4f 100755 (executable)
--- a/import-catacomb-crypto
+++ b/import-catacomb-crypto
@@ -19,6 +19,7 @@
 ### version 3 along with secnet; if not, see
 ### https://www.gnu.org/licenses/gpl.html.
 
+use strict;
 use autodie;
 
 use IPC::System::Simple qw{runx capturex $EXITVAL};
@@ -40,7 +41,7 @@ sub moan ($) { print STDERR "$PROG: $_[0]\n"; }
 
 my %DONOR_PATH_MAP = ();
 my %DONOR_REV_MAP = ();
-my $RECIP_CACHE = ();
+my %RECIP_CACHE = ();
 
 sub note_path ($$) {
   my ($donor, $recip) = @_;