> -----Original Message-----
> From: John Pitchko [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, July 30, 2002 12:59 PM
> To: <
> Subject: HTTP_EQUIV Meta Tag
> 
> 
> I can't get this HTTP_EQUIV meta tag to print. I am following 
> the syntax right out of the man pages:
> 
> print $query->start_html( -head => meta({ -http_equiv => 
> "refresh", -content => $refresh } ) );
> 
> And I get:
> 
> Content-type: text/html 
> Software error:
> Undefined subroutine &main::meta called at 
> /appl/webdocs/cgi-bin/tecgraph.cgi line 65.
> 
> For help, please send mail to this site's webmaster, giving 
> this error message and the time and date of the error. 
> According to ASPN:
> And here's how to create an HTTP-EQUIV <META> tag:
>       print start_html(-head=>meta({-http_equiv => 'Content-Type',
>                                     -content    => 'text/html'}))

meta() is a method generated "on-the-fly", so to speak, by CGI.pm,
so you need to tell perl that you mean to be calling CGI::meta by
either:

1. Import meta when you use CGI:

      use CGI qw(meta);

2. Call CGI::meta directly

      print start_html(-head => CGI::meta({ ...

3. Use your CGI object:

      print $query->start_html(-head => $query->meta({ ...

But unless you're generating a static HTML page here, why not just 
generate the Refresh response header directly?

      print $query->header(-refresh => 30);

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to