Hi all,

I started migrating my CGIs to use CGI.pm. Everything was fine except
for some additional text that popped up on the JavaScript section. Does
anyone know what could I be doing wrong? I tried quoting the 'EndOfMark'
but it didn't work either so I had to escape the @s to avoid compilation
issues.

######## HTML output

<script type="text/javascript">//<![CDATA[

                <script language="JavaScript" type="text/javascript">
                //Top Navigational Bar III v3.4.1.1b (By BrotherCake @
[EMAIL PROTECTED])
                //Permission granted/modified by Dynamicdrive.com to
include script in archive
                //For this and 100s more DHTML scripts, visit
http://www.dynamicdrive.com/
                //This notice MUST stay intact for legal use
                </script>
                
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/topmenu3/sniffer.js"></script>
                <script language="javascript1.2" type="text/javascript"
src="/ITTWeb/js/topmenu3/custom.js"></script>
                <script language="javascript1.2" type="text/javascript"
src="/ITTWeb/js/topmenu3/style.js"></script>

                <script language="JavaScript" type="text/javascript">
                //Xins Popup calendar script-  Xin Yang
(http://www.yxscripts.com/)
                //Script featured on/available at
http://www.dynamicdrive.com/
                //This notice must stay intact for use
                </script>
                
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/calendar/cal2.js"></script>
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/calendar/cal_conf2.js"></script>
                

//]]></script>

######## Perl code

my ($jscript) =<<EndOfMark;

                <script language="JavaScript" type="text/javascript">
                //Top Navigational Bar III v3.4.1.1b (By BrotherCake \@
[EMAIL PROTECTED])
                //Permission granted/modified by Dynamicdrive.com to
include script in archive
                //For this and 100s more DHTML scripts, visit
http://www.dynamicdrive.com/
                //This notice MUST stay intact for legal use
                </script>
                
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/topmenu3/sniffer.js"></script>
                <script language="javascript1.2" type="text/javascript"
src="/ITTWeb/js/topmenu3/custom.js"></script>
                <script language="javascript1.2" type="text/javascript"
src="/ITTWeb/js/topmenu3/style.js"></script>

                <script language="JavaScript" type="text/javascript">
                //Xins Popup calendar script-  Xin Yang
(http://www.yxscripts.com/)
                //Script featured on/available at
http://www.dynamicdrive.com/
                //This notice must stay intact for use
                </script>
                
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/calendar/cal2.js"></script>
                <script language="JavaScript" type="text/javascript"
src="/ITTWeb/js/calendar/cal_conf2.js"></script>
                
EndOfMark

print $entry_cgi->start_html(   -title=>$tags{'HEADER'},
        
-script=>$jscript,
        
-style => {-verbatim => '@import url("/ITTWeb/css/default.css");', -src
=> '/ITTWeb/css/default.css'}
        
);
######### End

Javier Moreno
-------------

Eaton | Truck Components
Systems Engineer - Transmissions

"When you have eliminated all which is impossible, then whatever
remains, however improbable, must be the truth" - Sherlock Holmes

_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to