|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Andrey Titov 2:5020/400 14 Apr 2001 14:07:35
To : All
Subject : Perl: русские буквы в нижнем регистре
--------------------------------------------------------------------------------
Имеется текст на Perl (см.ниже), который должен перевести
строку $body в нижний регистр. Hа сервере стоит Perl-5 (5.003).
Если строка написена латинскими буквами, то всё работает
нормально, но если строка написана по-русски, то в нижний
регистр перевести не удаётся. То же происходит и на моей
локальной машине. Этe проблему можно как-нибудь решить?
Thanks.
$body = "Hаша Маша Громко Плачет";
@new=split(/ /,$body);
foreach $word (@new) {
$word=lc($word);
}
$body = "@new";
print "$body<br>\n";
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
