Select Code to Download

print "Content-type: text/html\n\n";

print "Content-type: application/json\n\n";

#!/usr/bin/perl
use strict;
...
my $json = encode_json( [$string] );
print $cgi->header( -type => 'application/json' );
print $json;

function perlExecute(term){
    $.ajax({
...
        error: function() {alert("did not work");}
    });
};