javascript - 包含 Perl CGI Javascript，但未发生警报

Question

#!/usr/bin/perl -w
use warnings;
use diagnostics;
use CGI::Carp 'fatalsToBrowser';
use CGI qw(-debug);
use CGI ':standard';

print header(),
   start_html(-title => "OutSide File", -script   =>{-type=>"text/javascript",-src=>"javascript/javafile.js"}),
'<a href="#" onmouseOver="testfunc()"> mouse On </a>',
   end_html;

javafile.js 是 -

function testfunc(){
 alert("File")
}

testfunc 不会在屏幕上发出警报

Answer 1

我创建了 HTML 文件

perl test.pl >test.html

并在 Firefox 和 IE 中打开生成的文件。警报完美显示。

一些问题，可能会阻止警报发生

• 错误的目录层次结构，javafile.js必须在javascript子目录中
• Javascript 被 Noscript (Firefox) 抑制或在适当的安全区域 (IE) 中被禁用