■Perl, JSON, Ajax誰か助けて

PerlでJSONやろうと思ったら、ものすごく簡単なところでハマっているっぽい。とにかく、JSONとか言う前に、Perlで生成したJavaScriptコードをSCRIPTタグのSRCに指定して、読み込ませるところで失敗している。

test.pl

#!/usr/bin/perl

use strict;

use CGI;

my $q = new CGI;

print $q->header( -type=>'text/plain', -charset=>'UTF-8');

print "alert(\"Perl passed\");\n";

test.html

<html&gt;

<script type="text/javascript" src="test.pl"&gt; </script&gt;

</html&gt;

何でこれで動かないんだろう？すごい簡単なことしかやっていないのに。誰か教えて。

Permalink | 記事への反応(1) | 13:03

ツイートシェア