in reply to How do I find today's date?

use DateTime;

my $dt = DateTime->today;

print $dt->date;

[download]

In Section Seekers of Perl Wisdom