in reply to CGI: Having Trouble with HTTP-EQUIV

use CGI qw/:standard/;
my $q = new CGI();
print $q->header;
print $q->start_html(-head=>meta({-http_equiv=>'Refresh',
                           -content=>'3,http://foo.com/'}));

[download]

produces: 

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
<HTML><HEAD><TITLE>Untitled Document</TITLE>
<META CONTENT="3,http://foo.com/" HTTP-EQUIV="Refresh">
</HEAD><BODY>

[download]

In Section Seekers of Perl Wisdom