Multiple script tags?

peschkaj has asked for the wisdom of the Perl Monks concerning the following question:

Is it possible to use the CGI module to generate multiple script tags in the <head> element of an HTML document?

My question in entirely aesthetic - I don't like having script tags wandering about my HTML.

Thanks,
jeremiah

Comment on Multiple script tags?

Replies are listed 'Best First'.
Re: Multiple script tags? by duct_tape (Hermit) on Oct 14, 2003 at 15:57 UTC
Pass `-script` an array reference. Something like this? I assume this does what you want it to do. `print start_html(-script => [ 'js1', 'js2' ]);` [download] Hope that helps. Brad	[reply] [d/l] [select]
Re: Re: Multiple script tags? by peschkaj (Pilgrim) on Oct 14, 2003 at 16:09 UTC
Thanks, this seems to do the trick: `print $q->start_html( -script=>[ { 'language'=>"javascript", 'type'=>"text/javascript", 'src'=>"png.js" }, { 'language'=>"javascript", 'type'=>"text/javascript", 'src'=>"mailForm.js" } ] );` [download]	[reply] [d/l]
3Re: Multiple script tags? by jeffa (Bishop) on Oct 14, 2003 at 22:21 UTC
Just a little TIMTOWTDI on a Tuesday afternoon: `print $q->start_html( -script => [ map { language => 'javascript', type => 'text/javascript', src => $_, }, qw(png.js mailForm.js) ] );` [download] jeffa L-LL-L--L-LL-L--L-LL-L-- -R--R-RR-R--R-RR-R--R-RR B--B--B--B--B--B--B--B-- H---H---H---H---H---H--- (the triplet paradiddle with high-hat)	[reply] [d/l]