Fix $keep variable scope (refs #2221)

diff --git a/sdk/cli/bin/crunch-job b/sdk/cli/bin/crunch-job
index 4565dabcc4872b687b02e21e7e546bb4a753d584..2f7376f1e968974f7dd1b858560d064daf5f9eec 100755 (executable)
--- a/sdk/cli/bin/crunch-job
+++ b/sdk/cli/bin/crunch-job
@@ -1071,7 +1071,7 @@ sub process_stderr
 sub fetch_block
 {
   my $hash = shift;
-  my ($child_out, $output_block);
+  my ($keep, $child_out, $output_block);
 
   my $cmd = "arv keep get \Q$hash\E";
   open($keep, '-|', $cmd) or die "fetch_block: $cmd: $!";