|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Yuriy Kaminskiy 2:5020/517.21 10 Feb 2001 19:02:40
To : Artem Chuprina
Subject : Re: Hайти первое словосочетание из заглавных букв
--------------------------------------------------------------------------------
>>>>> On 20:25 09/2/2001, Artem Chuprina <2:5020/371.32> writes:
sankku> Можно попробовать use locale, но у меня почему-то эффекта нет
sankku> И такой регэксп ничего не находит:
sankku> m/^([A-ZА-Я0-9\s]+)\s/;
AC> use locale никому не обещал менять порядок букв в кодовой странице.
Кстати, а в современных perl'ах (>5.004_04) добавили character classes
а-ля POSIX basic regexp (к примеру, [[:alnum:]] или [[:lower:]]),
collate symbol и equivalence classes ([[.ch.]] и [[=я=]])?
Оно, конечно, завсегда можно воспользоваться
use POSIX;
use locale;
use constant UPPER => join "",grep {isupper($_=chr)} 0..255;
s/[${\UPPER}]/x/g;
но как-то это некузяво (и неэффективно, и несовместимо с
multibyte/unicode encodings) выглядит :(
--
Yuriy Kaminskiy.
PS имаксовые regexp умеют syntax classes, но не умеют ни (?...),
ни [[:...:]]. grep/sed/awk умеют [[:...:]], но не умеют (?...) и syntax
classes. perl - умеет (?...), но не умеет syntax classes, \<, \> и
[[:...:]]. Хрр.
--- Gnus v5.2.25/XEmacs 19.14
* Origin: Kyle Katan's station (2:5020/517.21@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
