Войти в систему

Home
    - Создать дневник
    - Написать в дневник
       - Подробный режим

LJ.Rossia.org
    - Новости сайта
    - Общие настройки
    - Sitemap
    - Оплата
    - ljr-fif

Редактировать...
    - Настройки
    - Список друзей
    - Дневник
    - Картинки
    - Пароль
    - Вид дневника

Сообщества

Настроить S2

Помощь
    - Забыли пароль?
    - FAQ
    - Тех. поддержка



Пишет Yuriy Al. Shirokov ([info]yushi)
@ 2005-06-24 12:18:00


Previous Entry  Add to memories!  Tell a Friend!  Next Entry
Perl'овое: как красиво разобрать строку с датой?
Довелось мне тут писать незамысловатую программку на Perl. В общем и целом, написал и даже заставил работать, но один маленький фрагмент её кода оскорбляет моё эстетическое чувство.

Задачка, собственно, элементарная:

Есть дата в формате: ГГГГ-ММ-ДД часы:минуты:секунды, лежащая, положим, в переменной$row_date . Хочется раскидать её по переменным $sec, $min, $hour, $day, $month, $year.

Я сейчас делаю это так:


($entry_date, $entry_time) = split(/ /,$row_date);
($year, $month, $day) = split(/-/,$entry_date);
($hour, $min, $sec) = split(/:/,$entry_time);


Казалось бы, логично. Но, согласитесь, громоздко и некрасиво. Даже не будучи ни программистом, ни — тем более! — специалистом по Perl'у, я догадываюсь, что то же самое можно сделать гораздо проще.


Соответственно, вопрос уважаемым френдам: как это можно сделать красиво, т.е. в идеале — без дополнительных переменных и в одной строке?


(Читать комментарии) - (Добавить комментарий)


[info]toshische@lj
2005-06-24 06:24 (ссылка)
Ого, так ты теперь и на машинке^H^H^H^H^H перле вышивать умеешь?

(Ответить) (Уровень выше) (Ветвь дискуссии)


[info]yegor_@lj
2005-06-24 07:47 (ссылка)
учусь.

(Ответить) (Уровень выше)


(Читать комментарии) -