Bug 9312: fix a couple more uninitialized variable warnings

Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>

diff --git a/tools/picture-upload.pl b/tools/picture-upload.pl
index 45523b5..21511ff 100755 (executable)
--- a/tools/picture-upload.pl
+++ b/tools/picture-upload.pl
@@ -47,7 +47,7 @@ my $cardnumber     = $input->param('cardnumber');
 my $uploadfilename = $input->param('uploadfile');
 my $uploadfile     = $input->upload('uploadfile');
 my $borrowernumber = $input->param('borrowernumber');
-my $op             = $input->param('op');
+my $op             = $input->param('op') || '';
 
 #FIXME: This code is really in the rough. The variables need to be re-scoped as the two subs depend on global vars to operate.
 #       Other parts of this code could be optimized as well, I think. Perhaps the file upload could be done with YUI's upload
@@ -227,6 +227,7 @@ sub handle_file {
     $debug and warn "Entering sub handle_file; passed \$cardnumber=$cardnumber, \$source=$source";
     $count{filenames} = ()      if !$count{filenames};
     $count{source}    = $source if !$count{source};
+    $count{count}     = 0       unless exists $count{count};
     my %filerrors;
     my $filename;
     if ( $filetype eq 'image' ) {