FIX error on Debian Jessie

diff --git a/pandoc.pm b/pandoc.pm
index ddc5299c2fd37c86a0edad3aee41273bcd4dc183..9cd224d26c9a41f2c72555c14053e3a968c8ab69 100755 (executable)
--- a/pandoc.pm
+++ b/pandoc.pm
@@ -283,16 +283,16 @@ sub htmlize ($@) {
     my @perl_content = @{decode_json($json_content)};
     my %header_section = %{$perl_content[0]};
     my @doc_title = @{$header_section{'docTitle'}};
-    my @doc_authors = @{$header_section{'docAuthors'}};
-    my $num_authors = @doc_authors;
+    my @doc_authors = (defined(@{$header_section{'docAuthors'}}) || ['']);
+    my $num_authors = (defined(@doc_authors) || ['']);
     my @primary_author = ();
     if ($num_authors gt 0) {
         @primary_author = @{$doc_authors[0]};
     }
-    my @doc_date = @{$header_section{'docDate'}};
+    my @doc_date = (defined(@{$header_section{'docDate'}}) || ['']);
 
     sub compile_string {
-        # The uncompiled string is an array of hashes containing words and 
+        # The uncompiled string is an array of hashes containing words and
         # string with the word "Space".
         my (@uncompiled_string) = @_;
         my $compiled_string = '';