Может ли метод cgi start_html () иметь несколько атрибутов -script?

Question

Я думаю, что вопрос довольно понятен, но я использую Perl для создания веб-страницы.Запускается с помощью:

$cgi->start_html(-title=>'myPage',-style=>{-src=>'style.css'},  -script=>{-type=>'JAVASCRIPT', -src=>'custom.js'}, );

Элемент списка

Но что, если я хочу иметь несколько скриптов в заголовке?Или несколько таблиц стилей 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" />

Answer 1

Использовать анонимный массив:

$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'}],
);

Answer 2

Конечно. Когда вы думаете, больше чем один , думайте массив . Когда вы думаете , передавая массивы как аргументы , думайте ссылка на массив .

use warnings;
use strict;
use CGI qw(:standard);

print start_html(-title => "myPage",
                 -style => [ {-src=>"style.css"},
                             {-src=>"basic.css"}, ],
                 -script => [ {-type=>"text/javascript",
                               -src=>"custom.js"},
                              {-type=>"text/javascript",
                               -src=>"ohai.js"}, ], );

__END__

…snip…
<title>myPage</title>
<link rel="stylesheet" type="text/css" href="style.css" />
<link rel="stylesheet" type="text/css" href="basic.css" />
<script src="custom.js" type="text/javascript"></script>
<script src="ohai.js" type="text/javascript"></script>
…snip…