Программирование > Perl

Регулярные выражения на Perl

(1/1)

:
Народ !!!
Я тут с регулярными выражениями в Perl\'e завис.
Есть строка, из нее надо выделить слова (убрать пробелы etc, оставить а-яА-Яa-zA-Z0-9).

Использую
@WorkArr = split(/[,._-\\s+]/, $word);

Но он не понимает если задано "слово1 - _ слово2".

И есть ли более универсальный способ ?

Chs:

--- Цитировать ---@lexandr (23-03-2001 10:28):
Народ !!!
Я тут с регулярными выражениями в Perl\'e завис.
Есть строка, из нее надо выделить слова (убрать пробелы etc, оставить а-яА-Яa-zA-Z0-9).

Использую
@WorkArr = split(/[,._-\\s+]/, $word);

Но он не понимает если задано "слово1 - _ слово2".

И есть ли более универсальный способ ?
--- Конец цитаты ---
@WorkArr = split(/[,\\._\\-\\s]+/, $word);

Более универсальный -
m/([\\w\\d]+)/g и perldoc Locale. :))

:
use locale у меня вообще ни разу не срабатывало.

как сделать, чтобы \\W (и подобные фичи) реагировало на русские символы ?

Chs:

--- Цитировать ---@lexandr (23-03-2001 15:26):
use locale у меня вообще ни разу не срабатывало.

как сделать, чтобы \\W (и подобные фичи) реагировало на русские символы ?
--- Конец цитаты ---

perldoc perllocale

Навигация

[0] Главная страница сообщений