Ate*_*ey1 7 html javascript perl cgi
我认为这个问题非常自我解释,但我使用perl来生成一个网页.开始使用:
$cgi->start_html(-title=>'myPage',-style=>{-src=>'style.css'}, -script=>{-type=>'JAVASCRIPT', -src=>'custom.js'}, );
Run Code Online (Sandbox Code Playgroud)
项目清单
但是如果我想在标题中有多个脚本呢?还是多个CSS样式表?
<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jquery/1.5.2/jquery.min.js"></script>
<script type="text/javascript" src="custom.js"></script>
<link rel="stylesheet" href="css/basic.css" type="text/css" />
<link rel="stylesheet" href="css/style.css" type="text/css" />
Run Code Online (Sandbox Code Playgroud)
使用匿名数组:
$cgi->start_html(
-title=>'myPage',
-style=>[{-src=>'style.css'},{-src=>'basic.css'}],
-script=>[{-type=>'JAVASCRIPT', -src=>'custom.js'},{-type=>'JAVASCRIPT', -src=>'http://ajax.googleapis.com/ajax/libs/jquery/1.5.2/jquery.min.js'}],
);
Run Code Online (Sandbox Code Playgroud)
当然。当您想到多个时,请考虑数组。当您考虑将数组作为参数传递时,请考虑数组 ref。
\n\nuse warnings;\nuse strict;\nuse CGI qw(:standard);\n\nprint start_html(-title => "myPage",\n -style => [ {-src=>"style.css"},\n {-src=>"basic.css"}, ],\n -script => [ {-type=>"text/javascript",\n -src=>"custom.js"},\n {-type=>"text/javascript",\n -src=>"ohai.js"}, ], );\n\n__END__\n\n\xe2\x80\xa6snip\xe2\x80\xa6\n<title>myPage</title>\n<link rel="stylesheet" type="text/css" href="style.css" />\n<link rel="stylesheet" type="text/css" href="basic.css" />\n<script src="custom.js" type="text/javascript"></script>\n<script src="ohai.js" type="text/javascript"></script>\n\xe2\x80\xa6snip\xe2\x80\xa6\nRun Code Online (Sandbox Code Playgroud)\n