use strict;
use warnings;
use JSON;
 
sub message :lvalue {
  my $a;
}
   
message = {
	   result  => JSON::false,
	   message => "You messed up",
	  };