Как получить текущую дату в формате ISO с помощью Perl?

Какой наиболее эффективный способ получить текущую дату в формате ISO (например, «2010-10-06») с помощью Perl?