|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Bulat Ziganshin 2:5093/4.126 19 Jun 2002 00:47:17 To : Ivan Lebedev Subject : Поменять регистр буковок... --------------------------------------------------------------------------------
Wednesday June 05 2002, Ivan Lebedev writes to All:
IL> Может есть у кого функция, преобразовывающая большие буквы
IL> (желательно
IL> и русские тоже) в маленькие? То есть, допустим, есть $stroka = 'Это
IL> Строка', а надо получить $stroka = "это строка"...
sub lcrus { my $a = lc $_[0]; tr/АБВГ.../абвг.../; $a }
Bulat, mailto:bulatz-AT-fort.tatarstan.ru, ICQ: work 15872722, home 11849833
... Иногда для того, чтобы изменить свое восприятие мира,
... люди пытаются изменить сам мир
--- GoldED+/W32 1.1.2
* Origin: Чубайс - повелитель тьмы (2:5093/4.126)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/33403d0fd508.html, оценка из 5, голосов 10
|