use strict;
use warnings;
use JSON;
...
message = {
  result  => JSON::false,
  message => "You messed up",
};