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'у, я догадываюсь, что то же самое можно сделать гораздо проще.


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