Fix for perl 5.8.8

Change the way $json_response has is referenced. See
https://stackoverflow.com/questions/20824920/perl-array-references-and-avoiding-type-of-arg-1-to-keys-must-be-hash-error