Perl CGI Meta标签
|
每个http://perldoc.perl.org/CGI.html制作元标记，都会给出以下示例：
print start_html(-head=>meta({-http_equiv => \'Content-Type\',-content => \'text/html\'}))
#!/usr/bin/perl
use strict;
use warnings;
use CGI;
my $cgi = new CGI;
$cgi->autoEscape(undef);
$cgi->html({-head=>meta({-http_equiv => \'Content-Type\',-content => \'text/html\',-charset=>\'utf-8\'}),-title=>\'Test\'},$cgi->p(\'test\'));
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\" />
没有找到相关结果
已邀请:
3 个回复
谷靛
时，子项不会自动导入。试试看（或）。号拳藐孔妇
#!/usr/bin/perl use strict; use warnings; use CGI qw(:all); my $cgi = new CGI; $cgi->autoEscape(undef); $cgi->charset(\'utf-8\'); print $cgi->start_html( -head => meta({-http_equiv => \'Content-Type\', -content => \'text/html\'}), -title => \'Test\' );烫珊
#!/usr/bin/perl use strict; use warnings; use CGI; my $cgi = new CGI; $cgi->autoEscape(undef); $cgi->html({-head=>$cgi->meta({-http_equiv => \'Content-Type\',-content=>\'text/html\',-charset=>\'utf-8\'}),-title=>\'Test\'},$cgi->p(\'test\'));