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 は画面上で警告しません