my $data = { 
    age=>18, 
    handler=>\"function(){ alert('hello, worldly') }" 
};
my $json = encode_json( $data )

##</code><code>##

{ age: 18, 
 handler: function(){ ... }
}