ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Titov 2:5020/400 05 May 2001 10:12:23
To : All
Subject : Re: Перевод введенной строки в ВЕРХHИЙ регистр
--------------------------------------------------------------------------------
> Вроде получилось:
>
> $b = $qsa{'word'};
> $b =~tr/а-я/А-Я/;
>
Так с Ё будут проблемы.
Я в нижний регистр переводил так:
$b =~ tr/\xA8\xC0-\xDF/\xB8\xE0-\xFF/;
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
