【发布时间】：2017-02-14 02:40:15
【问题描述】：
当我在下面的 Perl 程序的输入中键入一个俄语单词并单击提交时，我看到一个废话而不是俄语字母。
如何将编码为 CP1251 的页面中的数据传递给需要 UTF-8 字符串的处理程序脚本？ （下面的脚本是这种情况的一个简单示例。）
#!/usr/bin/perl
use strict;
use warnings;
use CGI qw/param/;
if (param('x')) {
print "Content-Type: text/plain; charset=utf-8\n\n";
print "[[".param('x')."]]";
} else {
print "Content-Type: text/html; charset=windows-1251\n\n";
print '<html><head><meta http-equiv="Content-Type" content="text/html; charset=windows-1251"></head>';
print "<form><input name='x'/><input type='submit'/></form>";
}
【问题讨论】：
标签： perl encoding character-encoding cgi param