BugTrack-wiki/320

diff --git a/plugin/pdf/PDFParser.pm b/plugin/pdf/PDFParser.pm
index 4e61328..6cbb3ac 100644 (file)
--- a/plugin/pdf/PDFParser.pm
+++ b/plugin/pdf/PDFParser.pm
@@ -120,7 +120,14 @@ sub get_texts {
        my $texts = "";
        foreach my $textobj (@$obj){
                foreach(@{$textobj->{texts}}){
-                       $texts .= $_;
+                       if(ref($_) eq 'PDFJ::Text'){\r
+                               my $obj2; push @$obj2,$_;\r
+                               $texts .= $self->get_texts($obj2);\r
+                       } elsif(ref($_) ne ''){\r
+                               next;\r
+                       } else {
+                               $texts .= $_;
+                       }
                }
        }
        return $texts;