Одесса: 0°С (вода 9°С)
Киев: -3°С
Львов: 0°С

Тема: Perl, балин...

Ответить в теме
Показано с 1 по 7 из 7
  1. Вверх #1
    Посетитель Аватар для Rett Pop
    Пол
    Мужской
    Адрес
    Odessa
    Возраст
    41
    Сообщений
    246
    Репутация
    37

    По умолчанию Perl, балин...

    Memento mori, All!

    Подмогните в освоении субжа, плз.
    Хочу из текстовика вида:
    Рынок\t0482\t250022
    Рынок\t0482\t250023
    Рынок\t0482\t250024
    Магазин\t0482\t123321
    Магазин\t0482\t123322
    Магазин\t0482\t123323

    , разбитого табуляциями, вынуть названия фирм, телефонные коды и телефоны. Все это впихнуть в хэш-хэшей вида:
    Firms{name{code, tel}},

    и потом вывести на экран в виде:
    Рынок: 250022, 250023, 250024
    Магазин: 123321, 123322, 123323

    Уперся пока в заполнение этого самого Firms{}.
    Буду благодарен за пример.
    WBR, Rett Pop


  2. Вверх #2
    Обрабатываешь массив строк в цикле, построчно - ищешь первый таб, потом второй..
    split, к сожалению, не пройдет

    Нет времени пока писать пример\код, может вечерком напишу)
    а так - пока идея...)
    Не будите во мне Зверя, он и так не высыпается

  3. Вверх #3
    Посетитель Аватар для Rett Pop
    Пол
    Мужской
    Адрес
    Odessa
    Возраст
    41
    Сообщений
    246
    Репутация
    37
    Цитата Сообщение от Tigra
    Обрабатываешь массив строк в цикле, построчно - ищешь первый таб, потом второй..
    split, к сожалению, не пройдет
    Он как раз подходит. Проверяю выводом на экран считываемых из файла значений.
    Проблема в корректном впихивании этих значений в хэш так, чтобы они не затирались.
    WBR, Rett Pop

  4. Вверх #4
    упс) поняла.. заработалась я что-то)
    Проблема с одинаковыми ключами.. Как решить самостоятельно - пока в голову не приходит, может, еще придет)
    Модуль Hash::Merge.. так, кажется
    Не будите во мне Зверя, он и так не высыпается

  5. Вверх #5
    Постоялец форума Аватар для Lord of rings
    Пол
    Мужской
    Адрес
    Одесса, типа украина...
    Сообщений
    2,509
    Репутация
    148
    На РНР с массивами всё просто... Дался вам этот Перл. Я тоже когда-то на нем пробовал ваять, потом плюнул и перешел на РНР...
    Per rectum ad astrum!

  6. Вверх #6
    Посетитель Аватар для Rett Pop
    Пол
    Мужской
    Адрес
    Odessa
    Возраст
    41
    Сообщений
    246
    Репутация
    37
    Цитата Сообщение от Lord of rings
    На РНР с массивами всё просто... Дался вам этот Перл. Я тоже когда-то на нем пробовал ваять, потом плюнул и перешел на РНР...
    Пока для себя - выбираешь ты. Когда за деньги - выбирает заказчик . И ежели ему надоть перл, то надоть знать перл.

    2All Промблему решил перековыряв доку к ActivePerl-у. С полпинка решение не прошло из-за попытки применения PHP-ных же понятий о массивах и хэшах. В перле оно по-другому реализовано. Добавление элемента в конкретный массив в хэше скалярных массивов в перле:

    Код:
    if ( m/$TelRE/om )
         {
            @tels = split (" ");
            ## Пробегаем по всем телефонам фирмы и впихиваем их как ключи в хэш телефонов
            for &#40; $Cntr = 0; $Cntr < scalar&#40;@tels&#41;; $Cntr++ &#41; &#123;
               push @&#123; $OutTels &#123;$tels&#91;$Cntr&#93;&#125; &#125;, $name;
            &#125;
         &#125;
    Конструкция "push @{ $" явилась неожиданностью
    WBR, Rett Pop

  7. Вверх #7
    Не усложняйте на ровном месте используйте регулярные выражения.
    /\s?(.*)\\(.*)\\(.*)\s?/


Ответить в теме

Похожие темы

  1. perl. использование замыкания в модуле
    от rosst в разделе Программирование
    Ответов: 0
    Последнее сообщение: 18.05.2008, 19:48
  2. консольный perl/php торрент-клиент
    от NoXX в разделе Программное обеспечение
    Ответов: 4
    Последнее сообщение: 20.06.2007, 14:51
  3. Настройка Perl
    от NoXX в разделе Программное обеспечение
    Ответов: 0
    Последнее сообщение: 15.09.2006, 20:03
  4. Apache + Perl +MySQL под Linux 2.4 Alt Master или RedHat 7.3
    от XGX в разделе Программное обеспечение
    Ответов: 3
    Последнее сообщение: 04.07.2006, 10:06
  5. Бесплатно 25 мб места, cPanel, MySQL, PHP, CGI, Perl и др.
    от OnlineHoster в разделе Интернет :: технические вопросы
    Ответов: 1
    Последнее сообщение: 25.02.2006, 22:00

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения