print CGI::header({type => 'application/json', status => '200 OK', 

print "$json_encoded_data";