Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - restart2003

Страницы: 1 [2] 3 4
16
Веб Сервера / Кодировка...
« : 29 Июля 2005, 05:17:19 »
Содержание головного .htaccess (кусок):
AddDefaultCharset windows-1251
CharsetSourceEnc windows-1251
RewriteEngine On
RewriteCond %{HTTP_HOST} ^http://www.site.ru$ [NC]
RewriteRule ^(.*)$ http://site.ru/$1 [R=301,L]

При запросе на http://www.site.ru получаю через валидатор вот что в заголовках:
HTTP Status Code: HTTP/1.1 301 Moved Permanently
Date: Fri, 29 Jul 2005 01:27:49 GMT
Server: E-Neverland DataPalm/1.7
Location: http://www.site.ru/
Content-Length: 808
Connection: close
Content-Type: text/html; charset=iso-8859-1
Redirect Target: http://site.ru/

Теперь, внимание, вопрос. Какого лешего у меня в кодировке стоит iso?

17
Perl / Как определить ресурсоёмкость скрипта?
« : 16 Мая 2005, 21:01:59 »
Цитировать
metton:
А ещё один и скрипт с одним и тем же запросом может выполняться от 0.07 до 0.76 секунды. Почему так?

Вроде зависит от загрузки сервака в данную секунду времени. У меня тоже бывает постоянно.

18
Perl / Кодировка и multipart/form-data
« : 15 Мая 2005, 01:10:31 »
Обнаружил интересную особенность: после поста в multipart-форму функция header не работает вообще. В этом и корень зла. Странно, я до сих пор не могу понять, почему она не срабатывает. Заголовки страницы после поста я всё-таки просмотрел, вот кусок без кукисов:
Код: [Выделить]
Date: Sat, 14 May 2005 19:31:33 GMT
Content-encoding: gzip
Content-Type: text/html; charset=ISO-8859-1
Буду пытаться разобраться... Всё осложняется тем, что большинство кода и собсно структура движка - не моё. Разбираться в чужом коде всегда сложнее.
Цитировать
простой Location в заголовке" это не очень хорошо.. обычно спец. софт приправляет его полем "Status: 30...",

Ну тогда сделал так:
Код: [Выделить]
print header(-status=>"302 Moved Temporarily", -location=>$SetLocation);

19
Perl / Кодировка и multipart/form-data
« : 14 Мая 2005, 09:42:51 »
Дык.
Есть sub header, отвечающий за заголовки.
Там есть примерно следующее:
Код: [Выделить]

$params{\'-charset\'} = "; charset=windows-1251";
$ret .= "$params{\'Content-Encoding\'}Content-Type: text/html$params{\'-charset\'}\\n\\n";
return $ret;

Так вот именно при передаче из multipart-формы, как установлено опытным путём, кодировка в браузере устанавливается в ISO (на странице, куда идёт POST. после перехода по любой ссылке кодировка опять становится нормальной). Во всех остальных случаях кодирока работает нормально.
Движок изрядно модифицированный фриварный, я уже перерыл всё на пример от чего это может быть, ничего не нашёл :(
Пока единтсвенное работающее решение: выдавать на странице, куда идёт POST, простой Location в  заголовке на другую страницу, на которой уже проблем с кодировкой нет. Но это не очень удобно, точнее очень неудобно.
Да, используется gzip сжатие.

20
Perl / Кодировка и multipart/form-data
« : 14 Мая 2005, 06:59:19 »
Странно, почему-то на Perl-форуме при отправке данных из формы multipart/form-data методом POST меняется кодировка страницы на ISO, хотя в метатегах явно указана windows-1251 ().  При отправке из обычной формы, или при сёрфинге форума всё впорядке. Никто не сталкивался?

21
Perl / вырезать теги из html файла
« : 27 Февраля 2005, 14:41:50 »
NeoNox
Гмда, спасибо. А про теги без параметров я и не подумал :)

22
Perl / разбиение строки и пауза в скипте
« : 27 Февраля 2005, 05:04:09 »
sickboy
my @array = split (/\\s+/,$string);
Даст массив из слов, разделённых знаками пробела/табуляции.

23
Perl / вырезать теги из html файла
« : 27 Февраля 2005, 05:00:37 »
А что в ней неправильного? Если надо всего-то вырезать пару тегов скриптов, не обязательно подгружать парсеры итп (по воробьям из пушки).

24
Perl / вырезать теги из html файла
« : 26 Февраля 2005, 03:58:02 »
s~(.+?)~~sgi
Если надо удалить со скриптами

s~~~sgi
Если только теги

25
Perl / Send Mail
« : 14 Февраля 2005, 20:41:22 »
NeoNox
Спасибо, попробую.

26
Perl / Send Mail
« : 14 Февраля 2005, 18:44:50 »
commander
Я люблю решать проблемы до их появления :)
Про критический порог - слышал в нескольких источниках - ~1000.Yaroslav
Это и так понятно, спасибо. Меня интересует конкретно отправка письма и альтернативные способы. :)

27
Perl / Send Mail
« : 14 Февраля 2005, 13:40:04 »
Занимает многовато времени - это раз. Боюсь, что при возросшем числе писем будут проблемы.
Во-вторых, слышал, что есть более эффективные варианты.

В принципе, если этот вариант будет работать при числе писем в несколько тысяч, то можно и его оставить.

28
Perl / Send Mail
« : 14 Февраля 2005, 03:14:18 »
Здравствуйте!
Я провожу рассылку на ~500 человек (число постоянно увеличивается).
Делаю весьма коряво:


my $mail_prog = "/usr/sbin/sendmail";
foreach $email (@mail) {
open (MAIL, "|$mail_prog -t") || die "cannot open mailprog";
print MAIL "To: $email <$email>\\n";
print MAIL "Reply-to: $from <$from>\\n";
print MAIL "From: $from <$from>\\n";
print MAIL "Subject: $subject\\n";
print MAIL "Content-type: text/html; charset=\\"Windows-1251\\"\\n\\n";
print MAIL "$tosend";
print MAIL "\\n\\n" ;
close(MAIL);
}

Надеюсь, кто-нибудь сможет поделиться более удачным решением (желательно без применения компилируемых модулей, т.к. шаред хостинг).
Спасибо за внимание.

29
Платный хостинг / mod_perl
« : 13 Января 2005, 08:24:18 »
Green Kakadu
Цитировать
Green Kakadu:
скорее подразумевалось под установкой модулей к Perl, а mod_perl - это уже модуль к Apache

Ну да, я тож так подумал.. Просто написано именно так, дословно.

30
Платный хостинг / mod_perl
« : 11 Января 2005, 10:03:24 »
Спасибо.. Просто много где видел услугу "установка модулей по запросу".

Да, а есть возможность использовать mod_perl только в некоторых папках, а то есть большие скрипты, переписывать которые под mod_perl долго очень? :)

Страницы: 1 [2] 3 4