Help for this page
sub to_json { my ($ref) = @_; ... return "\"$ref\""; } }
print to_json({ this => 'that', other => 'whatever' });