How to pass a HTTP parameter from a CP1251 page to a UTF-8 handler?

Question

When I type a Russian word in the input of the below Perl program and click Submit, I see a nonsense instead of Russian letters.

How to pass data from a page encoded as CP1251 to a handler script which needs UTF-8 strings? (The script below is a simple example of this situation.)

#!/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>";
}

score 1 · Accepted Answer · answered Oct 05 '16 at 15:16

1

I can ether convert the value of param() from CP1251 to UTF-8 or add accept-charset='utf-8' attribute to <form> element.

answered Oct 05 '16 at 15:16

porton

5,214
11
47
95

1

The `accept-charset` seems like the better idea. Also see http://stackoverflow.com/a/3721098/1331451 – simbabque Oct 05 '16 at 15:50

How to pass a HTTP parameter from a CP1251 page to a UTF-8 handler?

1 Answers1