Merge pull request #2076 from RincewindsHat/feature/json_parsing_in_tests

Implement JSON output parsing for tests

1 files changed, 8 insertions, 0 deletions

diff --git a/NPTest.pm b/NPTest.pm
index 9b25ac3e..987d3b71 100644
--- a/NPTest.pm
+++ b/NPTest.pm
@@ -15,6 +15,10 @@ use warnings;
 use Cwd;
 use File::Basename;
 
+use JSON;
+
+use Try::Tiny;
+
 use IO::File;
 use Data::Dumper;
 
@@ -617,6 +621,10 @@ sub testCmd {
     chomp $output;
     $object->output($output);
 
+    try {
+      $object->{'mp_test_result'} = decode_json($output);
+    };
+
     alarm(0);
 
     my ($pkg, $file, $line) = caller(0);