Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

how to set two script sources with cgi.pm start_html

by pitbull3000 (Beadle)
on Sep 01, 2001 at 03:35 UTC ( [id://109575]=perlquestion: print w/replies, xml ) Need Help??

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

i try to include two external javascript files with the following code into the output html file, but it always just prints the last one, and not both... any clue how i could solve this
print $query->start_html(-script=>{ -src=>'../assets/bwcheck.js', -src=>'../assets/scroller.js'}, );

Replies are listed 'Best First'.
Re: how to set two script sources with cgi.pm start_html
by wog (Curate) on Sep 01, 2001 at 03:47 UTC
    To do this correctly you need to do something pass an arrayref for the -script argument like this:

    print $query->start_html(-script=>[ {-src=>'../assests/bwcheck.js'}, {-src=>'../assests/scroller.js'}, ]);

    This is well documented in the CGI.pm documentation for start_html.

      unfortunately this is also not working, now it outputs even no script src, i already tried it this way. really dont know out of this problem
        Which version of CGI do you have installed? What does it print? Here's what I get, on Perl 5.5.3, with CGI version 2.752.
        $ perl use CGI; my $query = CGI->new(); print $query->start_html(-script=>[ {-src=>'../assests/bwcheck.js'}, {-src=>'../assests/scroller.js'}, ]); <?xml version="1.0" encoding="utf-8"?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML Basic 1.0//EN" "http://www.w3.org/TR/xhtml-basic/xhtml-basic10.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" lang="en-US"><head><title>U +ntitled Document</title> <script src="../assests/bwcheck.js" type="text/javascript" language="J +avaScript"></script> <script src="../assests/scroller.js" type="text/javascript" language=" +JavaScript"></script> </head><body>

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://109575]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (4)
As of 2024-03-29 07:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found