If you want to make the date more human-readable, you can use Date::Manip::UnixDate to format it:

$date = UnixDate( ParseDate("today") => '%b %e, %Y' );
print "Today's Date is $date.\n";
# MMM DD, YYYY (day is space-padded)
[download]