diff --git a/scripts/download.pl b/scripts/download.pl index bb9509c..7e9ef52 100644 --- a/scripts/download.pl +++ b/scripts/download.pl @@ -243,7 +243,7 @@ my ($outBytes) = &decryptMessages(@fileBytes); # get the message data my @outBytes = @{ $outBytes }; open (MESSAGEFILE, ">>$messageFile"); # write out the messages to a file - unless (scalar (@outBytes)) { print MESSAGEFILE "No message(s) found.\n"; } + unless (scalar (@outBytes)) { print MESSAGEFILE $filename . ',' . "No message(s) found.\n"; } else { foreach my $message (@outBytes) { print MESSAGEFILE $filename . ','; # include the file name