Модераторы: ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Распарсить строку помогите 
:(
    Опции темы
evya
Дата 26.4.2011, 18:06 (ссылка)    | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 257
Регистрация: 7.3.2009

Репутация: нет
Всего: нет



Имею строку
Date: Tue, 04 Aug 2009 08:43:12 +0400 



Как вытащить в переменную
$a = 04 
$b = Aug
$c = 2009 

PM MAIL   Вверх
EcSYZ
Дата 26.4.2011, 19:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 79
Регистрация: 21.6.2007

Репутация: нет
Всего: 1



Код

$str =~ /(\d{2})\s(\w+)\s(\d{4})/;
my $a = $1;
my $b = $2;
my $c = $3;

PM MAIL WWW   Вверх
ming
Дата 28.4.2011, 20:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 97
Регистрация: 30.1.2009
Где: Новосибирск

Репутация: 1
Всего: 3



evya, не в первый раз замечаю от вас подобные, одинаково простые вопросы. может стоит всё таки немного почитать про регексы по перлу, чем засорять форум?
PM MAIL ICQ Jabber   Вверх
evya
Дата 2.5.2011, 15:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 257
Регистрация: 7.3.2009

Репутация: нет
Всего: нет



посоветуйте что почитать 

PM MAIL   Вверх
shamber
Дата 2.5.2011, 18:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

Репутация: нет
Всего: 18



PM MAIL Jabber   Вверх
SkoobyDoo
Дата 2.5.2011, 18:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 73
Регистрация: 4.10.2007

Репутация: нет
Всего: нет



PM MAIL   Вверх
evya
Дата 2.5.2011, 20:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 257
Регистрация: 7.3.2009

Репутация: нет
Всего: нет



Пожалуйста подскажите, стал парсить строку 
Date: Tue, 04 Aug 2009 08:43:12 +0400 


$str =~ /(\d{2})\s(\w+)\s(\d{4})/;
my $a = $1;
my $b = $2;
my $c = $3;


Иногда $а может быть как в один символ (например 2), а иногда в 2 (например 02, как я просил)
если в один то распарсить строку не получается.
подскажите как можно решить проблему


а книгу обязательно прочту
PM MAIL   Вверх
shamber
Дата 2.5.2011, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1422
Регистрация: 5.9.2006
Где: Россия

Репутация: нет
Всего: 18



(\d{1,2})
PM MAIL Jabber   Вверх
SkoobyDoo
Дата 3.5.2011, 05:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 73
Регистрация: 4.10.2007

Репутация: нет
Всего: нет



Цитата(evya @ 26.4.2011,  21:06)
Имею строку
Date: Tue, 04 Aug 2009 08:43:12 +0400 



Как вытащить в переменную
$a = 04 
$b = Aug
$c = 2009

use HTTP::Date qw(parse_date time2str);

Это сообщение отредактировал(а) SkoobyDoo - 3.5.2011, 06:00
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Регулярные выражения | Следующая тема »


 




[ Время генерации скрипта: 0.0724 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.