> #######################
> # Start HTML OUT
> #######################
> print header;
> print start_html( -title => $title );
> print qq|<meta http-equiv="Pragma" content="no-cache">\n|;
>
> How do I move the Pragam inside the <head>...

The <META> tag should be declared inside start_html() as follows.

        print header,
              start_html(-title=>$title,
                         -meta=>{'http-equiv'=>'Pragma',
                                 'content'=>'no-cache'}
                        );

Also see...
http://www.perldoc.com/perl5.8.0/lib/CGI.html#CREATING-THE-HTML-DOCUMENT-HEADER

> ...and it also looks like I have two doctype definitions.

The doctype's are correct as is. Hope this helps.

-- 
=====================
 Shaun Fryer
=====================
 http://sourcery.ca/
 ph: 905-529-0591
=====================

Science is like sex: occasionally something useful
comes out of it, but that's not why we do it.
-: Richard Feynmann

Attachment: pgp00000.pgp
Description: PGP signature

Reply via email to