Во-первых, лучше использовать use utf8; вместо use encoding 'utf8';, т.к. согласно http://perldoc.perl.org/encoding.html
данная прагма в 5.18+ является deprecated.
Плюс добавить прагму:

use open qw/:std :utf8/;

Итого, попробуйте заменить

use CGI qw/:standard/;
use encoding 'utf8';

на

use open qw/:std :utf8/;
use utf8;
use CGI qw/:standard -utf8/;

<[email protected]> писал(а) в своём письме Thu, 16 Jan 2014 10:12:52 +0200:

Может поможет
use CGI qw( -utf8 :standard );

ничего не изменилось.

Если отключить #use encoding 'utf8';
данные с формы приходят правильные, но перестают работать:
Регулярные выражения: -
Регистр символов: -
и print div('данные из формы CGI:',$test_form);
на выводе:
данные из формы CGI: формы

_______________________________________________
Kiev-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kiev-pm


--
Написано в почтовом клиенте браузера Opera: http://www.opera.com/mail/
_______________________________________________
Kiev-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kiev-pm

Ответить