diff options
author | Jay Berkenbilt <ejb@ql.org> | 2013-01-20 21:26:45 +0100 |
---|---|---|
committer | Jay Berkenbilt <ejb@ql.org> | 2013-01-20 21:35:39 +0100 |
commit | f81152311e5737e5e0de9dd9462311f306c6921b (patch) | |
tree | e015c0efd7022cc259e898255db872fa52b73ca1 /examples/qtest/parse-content.test | |
parent | 1d88955fa68fb7fb0fd2d705bc80655edb7a5972 (diff) | |
download | qpdf-f81152311e5737e5e0de9dd9462311f306c6921b.tar.zst |
Add QPDFObjectHandle::parseContentStream method
This method allows parsing of the PDF objects in a content stream or
array of content streams.
Diffstat (limited to 'examples/qtest/parse-content.test')
-rw-r--r-- | examples/qtest/parse-content.test | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/examples/qtest/parse-content.test b/examples/qtest/parse-content.test new file mode 100644 index 00000000..a73566f8 --- /dev/null +++ b/examples/qtest/parse-content.test @@ -0,0 +1,17 @@ +#!/usr/bin/env perl +require 5.008; +BEGIN { $^W = 1; } +use strict; + +chdir("parse-content"); + +require TestDriver; + +my $td = new TestDriver('pdf-parse-content'); + +$td->runtest("parse content", + {$td->COMMAND => "pdf-parse-content input.pdf 1"}, + {$td->FILE => "content.out", $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); + +$td->report(1); |