1. Спонсор публикаций Marketplace codeby. Сервис, который так долго ждали. При расчетах используем биткоин. Первый товар уже в продаже: Консультация на тему ИБ от Ondrik8

    Скрыть объявление
  2. Спонсор публикаций Marketplace codeby. Сервис, который так долго ждали. При расчетах используем биткоин. Второй товар маркетплейса: Надёжная обфускация вашей программы от PingVinich

    Скрыть объявление

Помогите с поиском.

Тема в разделе "Perl программирование", создана пользователем CLSAMG, 14 окт 2010.

  1. CLSAMG

    CLSAMG Гость

    Репутация:
    0
    Уважаемые форумчане прошу Вашей помощи!
    Дан текст найти все слова начинающиеся с приставки ПРИ- и ПРЕ-.

    Что смог написать:
    Код (Text):
    $txt = "вы пригород прогород преступление ПрИвао яма пророк не ПРИВЕТ ПРИ\\\ при делах, запри дверь запредельно";
    @res=$txt=~/\s((при|пре)[А-ПР-Яа-пр-я]+)/g;
    print "@res\n";
    Выводит не все слова, помогите оптимизировать скрипт.
     
  2. ProFTP

    ProFTP Member

    Репутация:
    0
    Регистрация:
    20 ноя 2011
    Сообщения:
    6
    Симпатии:
    0
    Код (Text):
    @res=$txt=~/\s((при|пре)[А-ПР-Яа-пр-я]+)/g;
    опция i игнорирует регистр символов
    Код (Text):
    @res=$txt=~/\s((при|пре)[А-ПР-Яа-пр-я]+)/ig;
    или в чем вопрос?
     
  3. arto

    arto Member

    Репутация:
    0
    Регистрация:
    21 июн 2006
    Сообщения:
    10
    Симпатии:
    0
    # perl -CSA -Mutf8 -le 'print join "\n", ( $ARGV[0] =~ m#\b(пр[еи].*?)\b#gi )' "вы пригород прогород преступление ПрИвао яма пророк не ПРИВЕТ ПРИ\\\ при делах, запри дверь запредельно"
    пригород
    преступление
    ПрИвао
    ПРИВЕТ
    ПРИ
    при
    #
     
Загрузка...
Похожие Темы - Помогите поиском
  1. astana2030
    Ответов:
    1
    Просмотров:
    2.000
  2. number27
    Ответов:
    0
    Просмотров:
    75
  3. Rina
    Ответов:
    0
    Просмотров:
    88
  4. maksiiimka
    Ответов:
    2
    Просмотров:
    86
  5. Ким
    Ответов:
    23
    Просмотров:
    605

Поделиться этой страницей