> -----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]