How to create and access a json file using Perl and Javascript

Question

I'm not sure at all if I've approached this correctly. I've created a script in Perl that takes some simple data and creates a simple json formatted output. When I run it local in the shell, I can see the output is correct using a print commmand. The file is called "dates.cgi" and runs locally from the cgi-bin directory. When I try to access the file directly on my local web server, I get a 500 error. It's not a web page, of course, just json output.

I figured that was a web server error. So I set up a standard jquery ajax call, but it too is failing.

Here is the Perl script that prints to terminal correctly:

#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;

my $dir = '../data';
my $json;
my @dates;

opendir(DIR, $dir) or die $!;

while (my $file = readdir(DIR)) {

    # Use a regular expression to ignore files beginning with a period
    next if ($file =~ m/^\./);

    # pluck out first 8 chars
    my $temp = substr $file, 0, 8;

    # populate array
    push(@dates, $temp);

}
closedir(DIR);

# sort high to low
@dates = sort { $b <=> $a } @dates;
# print Dumper (@dates);

# loop through array and create inner section of json
my $len = @dates;

my $x = 0;
foreach (@dates){

    if ($x < $len-1){
        $json .= "\t{'date':'$_'},\n";  
    } else {
        $json .= "\t{'date':'$_'}\n";
    }

    $x++;

}

# add json header and footer
$json = "{'dates':[\n" . $json;
$json .= "]}";

# print
print "$json\n";

I'm trying to access it this way from a webpage to load the data in:

// load data json
$.ajax({
    url: "cgi-bin/dates.cgi",
    async: false,
    success: function (json) {
        dates = json;
        alert(dates);
        alert("done");
    },
    fail: function () {
        alert("whoops");
    }
    dataType: "json"
});

It's just silently failing. Where do I look next?

By silently failing, do you mean that the alert("whoops"); is not being called? — mgamba
– mgamba, Commented Jan 19, 2015 at 19:22
Yes, the rest of the page loads, 2 other ajax file loads execute correctly, but this ajax request with its alerts for success or fail are ignored. — dbonneville
– dbonneville, Commented Jan 19, 2015 at 19:26
also, check the jquery page for .ajax. Looks like they chain done, fail, always, etc instead of specifying inside the first argument — mgamba
– mgamba, Commented Jan 19, 2015 at 19:30
I'm not asking about json manipulation. Why was this marked duplicate? My question has nothing to do with the question Сухой27 posted. — dbonneville
– dbonneville, Commented Jan 19, 2015 at 19:50

Asheliahut · Accepted Answer · 2015-01-19 19:23:38Z

1

You should include the following to your perl file.

use CGI;
my $cgi = new CGI;

Then print proper header for json or just use text plain before anything is printed.

print "Content-Type: application/json", "\n\n";

print "Content-type: text/plain", "\n\n";

answered Jan 19, 2015 at 19:23

Asheliahut

9116 silver badges11 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

dbonneville Over a year ago

I added use CGI, etc from your suggestion. The shell output now looks like this: CGI=HASH(0x7fad440033f0) {'date':'20150112'}, {'date':'20150105'}, {'date':'20150101'} ]}

Asheliahut Over a year ago

thats an odd output. it seems like you are outputting the CGI variable. That would not be what you want to output. You just want to output the header line and the json.

mgamba · Accepted Answer · 2015-01-19 19:37:31Z

0

Check the jquery documentation for .ajax. Looks like they chain done, fail, always, etc instead of specifying inside the first argument

Example,

$.ajax({
  url: "cgi-bin/dates.cgi",
  async: false,
  dataType: "json"
})
.done(function(data) {
  dates = data;
  alert(dates);
  alert("done");
})
.fail(function() {
  alert("whoops");
})
.always(function() {
  alert( "complete" );
});

answered Jan 19, 2015 at 19:37

mgamba

1,2099 silver badges10 bronze badges

Collectives™ on Stack Overflow

How to create and access a json file using Perl and Javascript

2 Answers 2

2 Comments

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

2 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related