2,203
社区成员
发帖
与我相关
我的任务
分享如何把charset=iso-8859-1变成 AddDefaultCharset GB2312
这个简单的程序
#!c:/perl/bin/perl.exe
use CGI; # load CGI routines
$q = new CGI; # create new CGI object
print $q->header;
返回的html source is:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1"></HEAD>
<BODY></BODY></HTML>
请问如何才能使返回的charset 变成 GB2312呢？
#!c:/perl/bin/perl.exe
use CGI; # load CGI routines
$q = new CGI; # create new CGI object
print $q->header;
返回的html source is:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1"></HEAD>
<BODY></BODY></HTML>
请问如何才能使返回的charset 变成 GB2312呢？
...全文
请发表友善的回复…
发表回复
yourway 2004-07-01
- 打赏
- 举报
print $q->header(-charset => 'GB2312');
或者修改C:\Perl\lib\CGI.pm
或者修改C:\Perl\lib\CGI.pm
