Форум программистов, компьютерный форум, киберфорум
Perl
Войти
Регистрация
Восстановить пароль
 
miragex
1 / 1 / 3
Регистрация: 11.07.2012
Сообщений: 185
1

Регулярные выражения - поиск в русском тексте

01.06.2015, 22:09. Просмотров 392. Ответов 3
Метки нет (Все метки)

Доброй ночи
Пытаюсь произвести поиск, с помощью регулярного выражения, в русском тексте
Perl
1
2
3
4
5
6
7
8
9
use locale;
use POSIX qw(locale_h);
my $locale = setlocale(LC_ALL, "ru_RU.UTF-8");
 
foreach (keys%{$PRODUCTS}) {
    if ($PRODUCTS->{$_}=~/(роллы|суши)/) {
        print "продукты найдены";
    }
}
Ничего не ищет
Прошу помощи
Спасибо
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.06.2015, 22:09
Ответы с готовыми решениями:

Замена букв в тексте используя регулярные выражения
Здравствуйте! Вопрос такой: нужно привести текст из файла к определенному виду. Например: слово...

Поиск гласных в слове, регулярные выражения
Пытаюсь разобраться с регулярными выражениями и возникла проблема...Надо найти слова, в которых не...

Регулярные выражения
имеется файл из конечного числа слов. нужно в 1-ом и 3-ем словах строки четные буквы поменять...

Регулярные выражения
в общем код формирует файл, в котором собирается текст. Необходимо заменить все цифры 94, на 1994,...

3
volodin661
2594 / 1137 / 197
Регистрация: 10.12.2013
Сообщений: 3,830
01.06.2015, 23:52 2
Windows:
русский; "Locale"="00000419"

Perl
1
2
$_="роллы";
print "$1 : OK\n" if /(роллы|суши)/;
работает

Linux:
LANG=ru_RU.utf8
Perl
1
2
$_="роллы";
print "$1 : OK\n" if /(роллы|суши)/;
работает

Добавлено через 10 минут
уточнение: в случае виндовс кодировка исходника 1251, у линукс utf-8 .
0
KOPOJI
Почетный модератор
Эксперт HTML/CSSЭксперт PHP
16806 / 6686 / 877
Регистрация: 12.06.2012
Сообщений: 19,959
Завершенные тесты: 1
01.06.2015, 23:53 3
а зачем вообще что-то запоминать в этой регулярке? /роллы|суши/ и все
0
volodin661
2594 / 1137 / 197
Регистрация: 10.12.2013
Сообщений: 3,830
01.06.2015, 23:58 4
Цитата Сообщение от KOPOJI Посмотреть сообщение
а зачем вообще что-то запоминать
всё равно съедят всё ))
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.06.2015, 23:58

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Регулярные выражения
Ребят, только изучаю Perl, помогите - Необходимо результат ifconfig занести в hash массив. Не могу...

Регулярные выражения
Здравствуйте! Очень нужна помощь. В какой-то части кода, который я приложил, программа ищет строку...

Регулярные выражения
Есть такой перл-код: $var = "qwerty123qwerty"; $var =~ s/(.)\d.*\l/d/; print $var; Вывод такой:...

Регулярные выражения
Нужно определить, является ли введенная строка корректной записью числа. Корректная запись:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.