VPF::проблемы с кодировкой - Форум программистов

chaos

Дата 12.7.2010, 09:21 (ссылка)

(нет голосов)

Загрузка ...

Серийный программист

Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: 6
Всего: 44

Доброго времени суток!
Решаю следующую задачу: автоматическая загрузка контента на сайт.
Данные для загрузки берутся из файла с кодировкой UTF-8.

небольшой пример

Код


$response = $userAgent->get("http://lalalal.ru/addDataForm.php");
$content = $response->decoded_content;

Encode::from_to($content, "utf8", "cp1251");

@forms = Form::parse($content);
$forms[0]->value(data, $data_from_file_in_cp1251);
$forms[0]->click;

получаю на сайте вполне читабельные данные, но скрипт надо запускать под виндой.
копирую на виндовую машину и запускаю - в результате кракозябры.
Устал уже "танцевать с бубном" - ничего не получается

Может кто сталкивался подобным или есть какие-нибудь идеи.

Заранее благодарен!

ЗЫ Топик с вебом думаю не связан smile

связан с кодировкой, по этому запостил тут

Это сообщение отредактировал(а) chaos - 12.7.2010, 09:22

chaos

Дата 13.7.2010, 19:12 (ссылка)

(нет голосов)

Загрузка ...

Серийный программист

Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: 6
Всего: 44

кто-нибудь?!

OutlawZ

Дата 15.7.2010, 13:41 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Awaiting Authorisation
Сообщений: 269
Регистрация: 19.10.2007

Репутация: нет
Всего: нет

Попробуйте результаты в файл записать:

Код


use encoding 'CP1251', FILEPARSE => 'CP866';

open (FILEPARSE,'data.dat') or die "$!";
 print FILEPARSE $content;
close(FILEPARSE) or die "$!";

Точно не знаю , я с таким не работал , но может поможет. сильно не бить если что )))

--------------------

chaos

Дата 21.7.2010, 07:40 (ссылка)

(нет голосов)

Загрузка ...

Серийный программист

Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: 6
Всего: 44

поборол играми с Encode

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »