diff options
author | Jay Berkenbilt <ejb@ql.org> | 2022-01-19 15:31:28 +0100 |
---|---|---|
committer | Jay Berkenbilt <ejb@ql.org> | 2022-01-30 19:11:03 +0100 |
commit | 37105710ee0b332a3020d4b3220c95b8f4267555 (patch) | |
tree | ee4b520b1c141033ba16ba3696def57fc90f60fa /libtests/qtest/json_handler.test | |
parent | a6df6fdaf724ed5fc6f7e8c021f7804bd5a9c0e2 (diff) | |
download | qpdf-37105710ee0b332a3020d4b3220c95b8f4267555.tar.zst |
Implement JSONHandler for recursively processing JSON
Diffstat (limited to 'libtests/qtest/json_handler.test')
-rw-r--r-- | libtests/qtest/json_handler.test | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/libtests/qtest/json_handler.test b/libtests/qtest/json_handler.test new file mode 100644 index 00000000..6df51fc1 --- /dev/null +++ b/libtests/qtest/json_handler.test @@ -0,0 +1,17 @@ +#!/usr/bin/env perl +require 5.008; +use warnings; +use strict; + +chdir("json_handler") or die "chdir testdir failed: $!\n"; + +require TestDriver; + +my $td = new TestDriver('json_handler'); + +$td->runtest("JSON handler", + {$td->COMMAND => "json_handler"}, + {$td->FILE => "json_handler.out", $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); + +$td->report(1); |