Прблема с кирилицей в PERL скрипте

Статус
В этой теме нельзя размещать новые ответы.

EvLeS

Постоялец
Регистрация
21 Сен 2007
Сообщения
63
Реакции
11
Есть скрипт на перле примерно такого вида

PHP:
#!/usr/bin/perl -w
use warnings;
use strict;
use LWP::UserAgent;
use HTTP::Cookies;
 
my $user = $ARGV[0]; #логн
my $passwd =$ARGV[1]; #pass
my $email = $ARGV[2]; #e-mail
my $url = "http://xxx.xx";

my $ua = LWP::UserAgent->new(max_redirect => 0);
my $cookies = HTTP::Cookies->new();
$ua->cookie_jar($cookies);

my $req = $ua->post($url.'scrpipt.php', { Password => $passwd, email=> $email , user => $user } );

Скрипт прекрасно работает если $ARGV[0] который вводится с консоли состоит из латинских символов.Нужно заставить работать скрипт если вводить и кириллические символы что бы он корректно передавал кириллицу в форму.
Подскажите как это можно сделать?
 
Скорее всего то, что вы будете передавать из командной строки - в кодировки koi-8 (Unix системы) и CP866 (Windows). И то и другое нужно конвертировать в кодировку, которую ожидает получить скрипт, обрабатывающий вашу форму.
 
Статус
В этой теме нельзя размещать новые ответы.
Назад
Сверху