Forum Webscript.Ru

Программирование => Perl => Тема начата: Ilya от 05 Сентября 2001, 14:12:15

Название: Как заменить А на А
Отправлено: Ilya от 05 Сентября 2001, 14:12:15

Всем hi!
Кто сталкивался посоветуйте please :)
Есть масив, в нем нужно заменить:

А на А
Б на Б
и тд.

пробую так
for (@masiv) {~tr/АБ/\\\\А\\\\Б/}
получается вместо а &.

Что делать?

[Изменено 5.9.2001 автор: Ilya]

Название: Как заменить А на А
Отправлено: Ilya от 05 Сентября 2001, 17:49:54

О! Блин! Столько парился, а оказалось, что браузер мне показывал вместо А букву А. Я думал что не работает и парился, а когда начал писать в форум свое сообщение с то срау въехал в чем дело :)
Вот код, может кто захочет wap-сайт сделать, тогда ему он пригодится. Заменяет все русские буквы на нужный набор закорючек ;)for (@masiv){
~s/А/А/;
~s/Б/Б/;
~s/В/В/;
~s/Г/Г/;
~s/Д/Д/;
~s/Е/Е/;
~s/Ж/Ж/;
~s/З/З/;
~s/И/И/;
~s/Й/Й/;
~s/К/К/;
~s/Л/Л/;
~s/М/М/;
~s/Н/Н/;
~s/О/О/;
~s/П/П/;
~s/Р/Р/;
~s/С/С/;
~s/Т/Т/;
~s/У/У/;
~s/Ф/Ф/;
~s/Х/Х/;
~s/Ц/Ц/;
~s/Ч/Ч/;
~s/Ш/Ш/;
~s/Щ/Щ/;
~s/Ь/Ъ/;
~s/Ы/Ы/;
~s/Ъ/Ь/;
~s/Э/Э/;
~s/Ю/Ю/;
~s/Я/Я/;

~s/а/а/;
~s/б/б/;
~s/в/в/;
~s/г/г/;
~s/д/д/;
~s/е/е/;
~s/ж/ж/;
~s/з/з/;
~s/и/и/;
~s/й/й/;
~s/к/к/;
~s/л/л/;
~s/м/м/;
~s/н/н/;
~s/о/о/;
~s/п/п/;
~s/р/р/;
~s/с/с/;
~s/т/т/;
~s/у/у/;
~s/ф/ф/;
~s/х/х/;
~s/ц/ц/;
~s/ч/ч/;
~s/ш/ш/;
~s/щ/щ/;
~s/ь/ъ/;
~s/ы/ы/;
~s/ъ/ь/;
~s/э/э/;
~s/ю/ю/;
~s/я/я/;
}

И еще вопрос. Как сделать, чтобы скрипты запускались с нужным расширением? Например .wml?

Название: Как заменить А на А
Отправлено: Ilya от 05 Сентября 2001, 18:11:44

Пардон,
в конце каждой ~s/А/А/; нужно поставить g: ~s/А/А/g;

Название: Как заменить А на А
Отправлено: MyCom от 05 Сентября 2001, 22:16:33

Ну ты действительно парился :)

>И еще вопрос. Как сделать, чтобы скрипты запускались с нужным расширением? Например .wml?
Смотри в установках Apache
AddType application/x-httpd-php php .php3 .php4 .phtml
AddHandler cgi-script .bat .exe .pl .cgi


[Изменено 5.9.2001 автор: MyCom]

Название: Как заменить А на А
Отправлено: Ilya от 06 Сентября 2001, 13:05:46

Спасибо!
Вот только проблему это не решило :(
Хотел, чтобы страницы для мобил ;) (wap) генерились скриптом, но фиг там :(, как только сделал .wml - файлы исполняемыми, так они сразу перестали открываться в телефоне  
:mad:

Ни кто не сталкивался?

Название: Как заменить А на А
Отправлено: от 06 Сентября 2001, 13:09:17

Цитировать

Спасибо!
Вот только проблему это не решило :(
Хотел, чтобы страницы для мобил ;) (wap) генерились скриптом, но фиг там :(, как только сделал .wml - файлы исполняемыми, так они сразу перестали открываться в телефоне  
:mad:

А зачем делать WML исполняемым. Сгенерируй его каким-нибудь скриптом.

Название: Как заменить А на А
Отправлено: Ilya от 06 Сентября 2001, 13:32:59

Я так пробывал, телефон открывает только те файлы, у которых расширение .wml.
Я хотел засунуть perl-скрипт в файл с расширением wml, тоже не получается: через браузер скрипты запускаются, а черз телефон нет, пишет ошибку :(.
Теперь пытаюсь в wml-файл засунуть php скрипт, но тоже облом не получается настроить запуск php скрипта из файла с расширением wml. Может помнишь как это у enelis делалось?

Название: Как заменить А на А
Отправлено: Ilya от 06 Сентября 2001, 14:05:27

php скрипт с расширением wml запустил, но теперь телефон пишет:
Unsupported Content-Type: text/html
По всей видимости в ПХП этот заголовок стоит по умолчанию. Короче нужно на ПХП вывести вот это:

Text text text

Название: Как заменить А на А
Отправлено: Ilya от 06 Сентября 2001, 14:59:01

:D:D:D
УРА! ЗАРАБОТАЛО!!!
Очень долго парился с заголовком (Content-type: ) что только не писал.
А надо было: text/vnd.wap.wml

Вот код:

#!/usr/bin/perl
print \\"Content-type:text/vnd.wap.wml\\\\n\\";
print \\"

Text text text

\\\\n\\";

Хе! Прикольно я сам себе в форуме все объяснил :). Может кому пригодиться ;)

[Изменено 6.9.2001 автор: Ilya]